Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
Var
   A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A<B then Write(A)
else Write(B)
End.
465
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам