Написать простую программу(паскаль). Дано три числа a, b, c .Найти среди них минимальное.

9 Мая 2020 в 19:40
182 +1
0
Ответы
1

program MinNumber;

var
a, b, c: Integer;

begin
writeln('Enter three numbers:');
readln(a, b, c);

if (a <= b) and (a <= c) then
writeln('The minimum number is: ', a)
else if (b <= a) and (b <= c) then
writeln('The minimum number is: ', b)
else
writeln('The minimum number is: ', c);

end.

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