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

Даны два файла: input.txt и output.txt. В input.txt дана последовательность чисел: 1,6,11,16,21. В Output.txt отобразить размах ряда (т.е разность между наибольшим и наименьшим числом). Pascal
Гость
Ответ(ы) на вопрос:
Гость
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. 
Не нашли ответ?
Ответить на вопрос
Похожие вопросы