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

Question

Kumar

Информатика

1 октября, 04:20

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

+2

Ответы (1)

Знаешь ответ на этот вопрос?

Екатерина Молчанова · Answer 1

Program one

Var a, b, c:integer;

Begin

WriteLn ('a=');

ReadLn (a);

WriteLn ('b=');

WriteLn ('c=');

If a
Else If b
Else If c
Else If a=b=c WriteLn ('числа равны')

End.