• Предмет: Информатика
  • Автор: damikbaltabaevJos
  • Вопрос задан 7 лет назад

Решать на Pascal ABC.net версия 3.2 сборка 1417. Написать программу, которая выполняет сравнение многоразрядных десятичных ЦЕЛЫХ чисел. То-есть вывести > если первое число больше второго; вывести < если второе число больше первого; вывести = если числа равны.

Ответы

Ответ дал: Аноним
0
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.
Ответ дал: Аноним
0
А если Вам нужно сравнивать числа конкретного типа - например, BigInteger - это надо в условии уточнять.
Ответ дал: Аноним
0
Ну, лично я этот термин три раза встречал, и мне никто толком не объяснял, что это именно произвольная разрядность. Кстати, в Вашей программе можно и без преобразования в BigInteger))
Ответ дал: Аноним
0
Но если проверка не нужна - да можно .BigInteger убрать
Ответ дал: Аноним
0
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017

begin
  var a:=ReadlnString('1-е число:').ToBigInteger;
  var b:=ReadlnString('2-е число:').ToBigInteger;
  if a>b then Writeln('>')
  else
    if a=b then Writeln('=')
    else Writeln('<')
end.

Пример
1-е число: 45685695606778795409839437392759354
2-е число: 8643603434233452532223423423525
>

Замечание: разрядность чисел - произвольная.
Вас заинтересует