8000
|
3084
|
8636
|
9105
|
8121
|
2859
|
6525
|
2
|
Мы можем
считать, что наше "длинное" число представлено в 10000-10 системе
счисления (десятитысячно-десятичная система счисления, приведите аналогию с
восьмерично-десятичной системой счисления), а "цифрами" числа
являются четырехзначные числа.
Возникают
вопросы. Что за 9 в А [0], почему число хранится "задом наперед"?
Ответы очевидны, но подождем с преждевременными объяснениями. Ответы на вопросы
будут ясны из текста.
Примечание. Мы
работаем с положительными числами!
Первая задача.
Ввести "длинное" число из файла. Решение задачи начнем с описания
данных.
Const MaxDig = 1000; {Максимальное
количество цифр — четырехзначных!}
Osn = 10000; {Основание нашей системы
счисления,
в
элементах массива храним четырехзначные числа}
Type Tlong
= Array[0..MaxDig] Of Integer;
{Максимальное количество десятичных цифр в
нашем числе}
Алгоритм ввода
"длинного" числа из файла рассмотрим на конкретном примере.
Пусть в файле
записано число 23851674 и основанием (Osn) является 1000 (храним по три цифры в
элементе массива А). Изменение значений элементов массива А в процессе ввода
(посимвольного в переменную Ch) отражено в табл. 2.
Таблица 2