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

Program naimen;

Var A, B: integer;

begin

Write (Введите число А=);

Read (A);

Write (Введите число B=);

Read (B);

If A

Write (Наименьшее число А)

else Write (Наименьшее число В);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку