Определить содержимое файла f, после выполнения следующих операторов:

@mawor · Регистрация: 16.11.2018

Pascal

1	Var f: file of integer; i: integer;

Определить содержимое файла f, после выполнения следующих операторов:

а)

Pascal

1
2
3

rewrite(f);
if eof(f) then write(f,1) else write(f,2);
if eof(f) then write(f,3) else write(f,4);

б)

Pascal

1	rewrite(f); for i:=3 downto 1 do write(f,sqr(i));

@Cyborg Drone · 21.11.2018, 08:45

а) 1, 3
б) 9, 4, 1

@Cyborg Drone Модератор 9593 / 4912 / 3245 Регистрация: 17.08.2012 Сообщений: 15,346
	21.11.2018, 08:45	2
	Сообщение было отмечено mawor как решение Решение а) 1, 3 б) 9, 4, 1 1

Опции темы

Решение