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