Во входном файле 2 строки,каждая из которых содержит по три целых числа,разделенных пробелами.напишите программу,которая в выходной файл выводит одно число-максимальное из чисел,встретившихся во входном файле.(паскаль)

14 Окт 2019 в 03:45
152 +1
0
Ответы
1

program MaxNumber;

var
inputFile, outputFile: text;
a, b, c, maxNumber: integer;

begin
assign(inputFile, 'input.txt');
reset(inputFile);

readln(inputFile, a, b, c);

maxNumber := a;

if b > maxNumber then
maxNumber := b;

if c > maxNumber then
maxNumber := c;

close(inputFile);

assign(outputFile, 'output.txt');
rewrite(outputFile);

writeln(outputFile, maxNumber);

close(outputFile);
end.

19 Апр 2024 в 11:25
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир