Нужна программка на pascal Современные компы могут исполнять арифметические деяния с

Нужна программка на pascal
Современные компьютеры могут исполнять арифметические деянья с достаточно великими целыми числами (наибольшее число целого типа 18446744073709551615), а всего 20 лет вспять диапазон был ограничен 65536, что меньше в несколько сотен триллионов раз (10 в 14 ступени раз).

Но как быть, если нужно выполнить арифметические операции над числами, разрядность которых больше 20 (т.е. число будет больше, чем 18446744073709551615)? Один из методов, это представить число в виде массива, элементы которого числа данного числа.
Напишите программку для поиска максимального из 3-х чисел, состоящих из 20 разрядов.
Входные данные:
Три числа, перечисленные через пробел. Разрядность каждого не более 25. Числа не одинаковы.

Выходные данные:
Величайшее из 3-х данных чисел.

ПРИМЕР:
Входные данные:
1234 12345678901234567890 123123123123123
Выходные данные:
12345678901234567890

Входные данные:
32345678901234567890 12345678901234561111 12345678901234567890
Выходные данные:
32345678901234567890

Задать свой вопрос
1 ответ
Решение, использующее указанный метод, находится во вложенном файле. Желаю предупредить: программка была написана в среде PascalABC.NET, и в каких-то иных средах массивы могут вести себя не совершенно правильно, т.е. выдавать ошибку. В этом случае пробуйте поменять строчку с объявлением n на "n:array[1..3] of array[0..24] of byte;", убрать строчку "setlength(n[i],len[i]);" и все выражения  вида n[a][b] поменять на n[a,b].
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт