Составить на Паскале программу определения минимума из трёх чисел без использования логических операций. Программа должна иметь дружественный интерфейс (ввод данных осуществляться в режиме диалога).

18 Апр 2020 в 19:40
145 +1
0
Ответы
1
program MinOfThreeNumbers;
var
num1, num2, num3, min: integer;
begin
writeln('Enter the first number:');
readln(num1);
writeln('Enter the second number:');
readln(num2);
writeln('Enter the third number:');
readln(num3);
min := num1;
if num2 < min then
min := num2;
if num3 < min then
min := num3;
writeln('The minimum number is: ', min);
end.

Программа спрашивает у пользователя три числа и определяет минимальное из них.

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