Даны два файла: input. txt и output. txt. В input. txt дана последовательность чисел: 1,6,11,16,21. В Output. txt отобразить размах ряда (т. е разность между наибольшим и наименьшим числом). Pascal

Question

Информатика

Памфил

15 января, 21:59

Даны два файла: input. txt и output. txt. В input. txt дана последовательность чисел: 1,6,11,16,21. В Output. txt отобразить размах ряда (т. е разность между наибольшим и наименьшим числом). Pascal

+3

Ответы (1)

Знаете ответ?

Лела · Answer 1

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.