Satunan
5 год назад
Решать на Pascal ABC.net версия 3.2 сборка 1417. Написать программу, которая выполняет сравнение многоразрядных десятичных ЦЕЛЫХ чисел. То-есть вывести > если первое число больше второго; вывести < если второе число больше первого; вывести = если числа равны.
ОТВЕТЫ
Василка
Oct 24, 2020
Var a,b:uint64;
Begin
Write('Введите два целых числа: ');ReadLn(a,b);
if a > b then Write(a,' > ',b)
else if a < b then Write(a,' < ',b)
else Write(a,' = ',b)
End.
Begin
Write('Введите два целых числа: ');ReadLn(a,b);
if a > b then Write(a,' > ',b)
else if a < b then Write(a,' < ',b)
else Write(a,' = ',b)
End.
997
Смежные вопросы:
