Определите содержание файла f после исполнения операторов

@denkosh96 · Регистрация: 18.06.2016

Pascal

1	VAR f : file of integer; k, i : integer;

Определите содержание файла f после исполнения таких операторов:

Pascal

Rewrite(f);
for i:=10 downto 5 do
begin
k:= sqr(i); write(f,k);
end;

@Puporev · 19.06.2016, 19:18

100 81 64 49 36 25

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	19.06.2016, 19:18	2
	100 81 64 49 36 25 0