Для начала разберём какие целочисленные типы данных нам доступны.
Целочисленные типы данных:
| Тип [attr rowspan="2"] | Borland Pascal / Turbo Pascal / Object Pascal [attr colspan="2"] | Delphi [attr colspan="2"] | Pascal ABC [attr colspan="2"] | |||
| Диапазон | Размер(байт) | Диапазон | Размер(байт) | Диапазон | Размер(байт) | |
| Byte | 0..255 | 1 | 0..255 | 1 | 0..255 | 1 |
| ShortInt | -128..127 | 1 | -128..127 | 1 | -128..127 | 1 |
| SmallInt | - | - | −32768..32767 | 2 | −32768..32767 | 2 |
| Word | 0..65535 | 2 | 0..65535 | 2 | 0..65535 | 2 |
| Integer | -32768..32767 | 2 | −2147483648..2147483647 | 2-4 | −2147483648..2147483647 | 4 |
| Cardinal | - | - | 0..4294967295 | 4 | 0..4294967295 | 4 |
| LongWord | - | - | 0..4294967295 | 4 | 0..4294967295 | 4 |
| LongInt | -2147483648..2147483647 | 4 | -2147483648..2147483647 | 4 | -2147483648..2147483647 | 4 |
| Int64 | - | - | -9223372036854775808..9223372036854775807 | 8 | -9223372036854775808..9223372036854775807 | 8 |
| QWord | - | - | 0..18446744073709551615 | 8 | - | - |
| UInt64 | - | - | - | - | 0..18446744073709551615 | 8 |
Что бы объявить целочисленную переменную в блоке var надо указать имя и тип переменной по следующему шаблону:
<имя переменной 1>,<имя переменной 2>, … ,<имя переменной n>:<тип>;
Как видно из шаблона, можно объявлять сразу несколько переменных.
Пример:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
var b:Byte; Sh,Sh2,Sh3,Sh4:ShortInt; Sm:SmallInt; W:Word; I:Integer; c:Cardinal; LW:LongWord; LI:LongInt; I64:Int64; QW:QWord; UI:UInt64; |
Функции применяемые для целочисленных переменных:
Odd
Function Odd(X: Longint): Boolean; — Результатом выполнения функции будет логическая переменная. Для чётного аргумента — FALSE. Для нечётного TRUE.
Пример:
|
1 2 3 4 5 6 7 |
program Odd; var I : Integer; begin Writeln(Odd(5));{TRUE} Writeln(Odd(4));{FALSE} end. |
Результатом будет соответственно на 5 — TRUE, а на 4 — FALSE.
Succ
Function Succ(X: Longint): Longint; — Результатом выполнения функции будет следующее целое число (x+1).
Пример:
|
1 2 3 4 |
program Succ; begin Writeln(succ(5)); end. |
Результатом будет 6.
Pred
Function Pred(X: Longint): Longint; — Результатом выполнения функции будет предыдущее целое число (x-1).
Пример:
|
1 2 3 4 |
program Pred; begin Writeln(Pred(5)); end. |
Результатом будет 4.
Ord
Function Ord(X: Longint): Longint; — Результатом функции будет порядковый номер элемента х в типе, для целочисленных типов результат будет равен аргументу.
Пример:
|
1 2 3 4 |
program Ord; begin Writeln(ord(ord(ord(ord(ord(ord(5))))))); end. |
Результатом будет 5.
Abs
Function abs(X: Longint): Longint; — Результатом функции будет модуль числа.
Пример:
|
1 2 3 4 |
program Abs; begin Writeln(abs(-5)); end. |
Результатом выполнения функции будет 5.
Sqr
Function sqr (X: Longint): Longint; — Результатом функции будет квадрат числа X.
Пример:
|
1 2 3 4 5 |
program Sqr; begin Writeln(sqr(-5)); Readln; end. |
Результатом выполнения функции будет 25.
Функции результатом которых будет вещественный тип:
Sqrt
Function sqrt (X: Longint): Real; — Результатом функции будет квадратный корень числа X, результат будет в вещественном типе.
Пример:
|
1 2 3 4 |
program Sqrt; begin Writeln(sqrt(25)); end. |
Результатом выполнения функции будет 5.0000000000000E+0000. Результат в вещественном типе.
Exp
Function exp(X: Longint): Real; — Результатом функции будет e в степени X, результат буде в вещественном типе.
Пример:
|
1 2 3 4 |
program Exp; begin Writeln(exp(25)); end. |
Результатом выполнения функции будет 7.20048993373859E+0010. Результат в вещественном типе.
Sin
Function sin(X: Longint): Real; — Результатом функции будет синус числа X, результат буде в вещественном типе.
Пример:
|
1 2 3 4 |
program Sin; begin Writeln(Sin(2)); end. |
Результатом выполнения функции будет 9.09297426825682E-0001. Результат в вещественном типе.
Cos
Function cos(X: Longint): Real; — Результатом функции будет косинус числа X, результат буде в вещественном типе.
Пример:
|
1 2 3 4 |
program Cos; begin Writeln(Cos(2)); end. |
Результатом выполнения функции будет -4.16146836547142E-0001. Результат в вещественном типе.
Ln
Function ln(X: Longint): Real; — Результатом функции будет натуральный логарифм числа X, результат буде в вещественном типе.
Пример:
|
1 2 3 4 |
program Ln; begin Writeln(Ln(2)); end. |
Результатом выполнения функции будет 6,93147180559945E-0001. Результат в вещественном типе.
Arctan
Function arctan(X: Longint): Real; — Результатом функции будет арктангенс числа X, результат буде в вещественном типе.
Пример:
|
1 2 3 4 |
program Arctan; begin Writeln(arctan(2)); end. |
Результатом выполнения функции будет 1.10714871779409E+0000. Результат в вещественном типе.
Функции результатом которых будет литерный тип:
Chr
Function Chr(X: Byte) : Char; — результатом функции будет символ, код которого равен X в таблице ASCII.
Пример:
|
1 2 3 4 |
program Chr; begin Writeln(Chr(100)); end. |
Результатом выполниям функции будет литера ‘d’.
Процедуры целочисленного типа:
Dec
Procedure Dec(var X: Longint[; N: Longint]); — Данная процедура уменьшает число X на N, если число не задано, то уменьшает на 1.(X-N)
Пример:
|
1 2 3 4 5 6 7 8 |
program Dec; var i : Integer; begin i:=5; dec(i,2); Writeln(i); end. |
В результате переменная i будет равняться 3.
Inc
Procedure Inc(var X: Longint[; N: Longint]); — Данная процедура увеличивает число X на N, если число не задано, то увеличивает на 1.(X+N)
Пример:
|
1 2 3 4 5 6 7 8 |
program Inc; var i : Integer; begin i:=5; inc(i,2); Writeln(i); end. |
В результате переменная i будет равна 7.
Так же над целочисленными переменными возможно проводить различные арифметические операции рассмотрим их отдельно. Арифметические операции.
Комментарии: