Составить программу на языке Pascal которая определяет наибольшее из 5 вводимых чисел, программу записать с помощью оператора if ... then

23 Апр 2020 в 19:40
127 +1
0
Ответы
1
program FindLargestNumber;
var
num1, num2, num3, num4, num5, largest: integer;
begin
writeln('Enter five numbers:');
readln(num1, num2, num3, num4, num5);
largest := num1;
if num2 > largest then
largest := num2;
if num3 > largest then
largest := num3;
if num4 > largest then
largest := num4;
if num5 > largest then
largest := num5;
writeln('The largest number is: ', largest);
end.
18 Апр 2024 в 13:25
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир