
Александра
5 год назад
вивести менше з двох даних чисел
ОТВЕТЫ

Yana
Oct 24, 2020
Var
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A<B then Write(A)
else Write(B)
End.
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A<B then Write(A)
else Write(B)
End.
465
Смежные вопросы: