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

Question

Информатика

Сосипатра

9 июня, 03:50

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

+1

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