Var f: text; i, x: integer; определите содержимое - вопрос №5806646 от vano22312231 07.04.2021 22:11

Question

Информатика: Var f: text; i, x: integer; определите содержимое файла f после выполнения следующих операторов: rewrite(f); for i: =3 downto 1 do begin x: =2*i; write(f, x) end; close(f);

vano22312231 · Answer

В файл будут записываться числа 6, 4 и 2, но так как никаких разделителей между числами нет, то получится 642...