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

Question

Информатика

Памфил

11 октября, 16:21

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

+4

Ответы (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.