Question

11. Чтобы установить связь программы с файлом необходимо прописать команду:
Var f1:text; a:integer;
begin
1) Read (f1,a)
2) Assign (f1, ‘input.txt’);
3) Reset (f1);
4) Верного ответа нет

Answer 1

нужно прописать 2 команду

Answer 2

2) Assing(f1,'input.txt');