вивести менше з двох даних чисел

Вопрос школьника по предмету Информатика

вивести менше з двох даних чисел

Ответ учителя по предмету Информатика

Var

   A,B:integer;

Begin

Write(‘Введите два числа: ‘);ReadLn(A,B);

if A<B then Write(A)

else Write(B)

End.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Похожие вопросы от пользователей