Даны два файла: input.txt и output.txt. В input.txt дана последовательность чисел: 1,6,11,16,21. В Output.txt отобразить размах ряда (т.е разность между наибольшим и наименьшим числом). Pascal
Ответы на вопрос
Ответил 9277машенька
0
a,b : byte;
F : file of byte;
begin
assign(F,'input.txt'); reset(F);
read(F,a);
close(F);
assign(F,'output.txt'); rewrite(F);
write(F,b);
close(F);
end.
F : file of byte;
begin
assign(F,'input.txt'); reset(F);
read(F,a);
close(F);
assign(F,'output.txt'); rewrite(F);
write(F,b);
close(F);
end.
Новые вопросы