Целый тип longint
Турбо-Паскаль имеет возможности для расширения диапазона значений целых переменных.
Так, если тип integer устанавливает диапазон целых значений от -32768 до 32767, то целый тип longint расширяет его от -2147483648 до 2147483647.
Итак, если установить тип переменных longint, тогда выше приведенные программы будут работать для значительно большего множества целых чисел.
Программы
станут такими:
Program
Problem1; { Опред. и вывод на экран цифр числа }
uses WinCrt;
var
n, p, i : longint;
begin
write('Введите натуральное число n '); readln(n);
i := 1;
while n <> 0 do
begin
p := n mod 10;
writeln(i, ' - я цифра справа равна ', p);
n := n div 10;
i := i+1
end
end.
Program Sum; { Сумма цифр числа }
uses WinCrt;
var
a, n, s, p : longint;
begin
write('Введите натуральное число n '); readln(n);
a := n; s := 0;
while n <> 0 do
begin
p := n mod 10; {Определяются цифры числа}
s := s + p; {Находится их сумма}
n := n div 10
end;
writeln('Сумма цифр числа ', a, ' равна ', s)
end.
Program
Problem2a; { Перест. первой и последней цифр числа }
uses WinCrt;
var
n, n1, p, a, i : longint;
begin
write('Введите натуральн. число n <= 2147483647 ');
readln(n);
a := n;
i := 1;
p := n mod 10; {последняя цифра введенного числа}
while n >= 10 do
begin
i := i*10;
n := n div 10;
end;
n1 := a - n*i - p + n + p*i;
writeln('Число после перестановки цифр ', n1);
end.
Подведем итог о
целых типах.
Диапазон возможных значений целых типов зависит от их внутреннего представления, которое может занимать один, два или четыре байта. В таблице приводятся названия целых типов, длина их внутреннего представления в байтах и диапазон возможных значений.
Целые типы
Длина, байт |
Название типа |
Диапазон значений |
1 |
byte |
0 ... 255 |
1 |
shortint |
-128 ... 127 |
2 |
word |
0 ... 65535 |
2 |
integer |
-32768 ... 32767 |
4 |
longint |
-2147483648 ... 2147483647 |
Целый тип данных относится к порядковым типам, которые отличаются тем, что каждый из них имеет конечное число возможных значений. Эти значения можно определенным образом упорядочить и, следовательно, с каждым из них можно сопоставить некоторое целое число - порядковый номер значения (отсюда название типов - порядковый).
Вещественные типы, строго говоря, тоже имеют конечное число значений, которое определяется форматом внутреннего представления вещественного числа. Однако количество возможных значений вещественных типов настолько велико, что сопоставить с каждым из них целое число (его номер) не представляется возможным.
Порядковый
и вещественный типы, в свою очередь, относятся к простым типам.