Ответы
Ответ дал:
0
Var
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A>B then Write(A)
else Write(B)
End.
Введите два числа: 3 1
3
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A>B then Write(A)
else Write(B)
End.
Введите два числа: 3 1
3
Похожие вопросы
2 года назад
2 года назад
6 лет назад
6 лет назад
9 лет назад