2.6. Описания переменных.

Описания переменных зависят от типа данных, которые будут храниться в ячейках памяти, названных именами этих переменных.

Данные в Паскале могут быть следующих типов:

Данные

Каждому типу данных могут соответствовать константы. Количество элементов констант (цифр, букв) сильно зависит от конкретной конфигурации машины. Однако можно сказать, что для целого типа числа максимальное значение 32767, для вещественных, как минимум, - до 7 цифр мантиссы, для строковых - 255 символов и т.д.

Константы байтового типа - целые числа в диапазоне 0 - 255. Целые константы - набор цифр, возможно, со знаком + или -. Вещественные константы могут записываться в двух формах - с фиксированной точкой: 57.34; -256.758

и с плавающей точкой: 5.734е+01 (эквивалент 57.34) и

-2.56758е+02 (эквивалент -256.758).

Логических (булевских) констант всего две: TRUE и FALSE. принято, что в машинном коде TRUE=1, FALSE=0. знаковые константы представляют все символы алфавита плюс символы кириллицы, но не для того, чтобы символ стал константой, его нужно заключить в апострофы: А, 1, +, ? и т.д. Константы могут храниться в ячейках памяти, определенных какими-либо именами (идентификаторами).

Идентификатор - набор букв и цифр, первая из них - всегда буква, например А, ALP1, B2, GAMMA. Идентификаторы могут быть длиной до 255 символов, однако большинство компиляторов накладывает ограничение, т.е. длина имени не должна превышать восьми символов. Идентификатор в своем составе может содержать знак _ (подчерк).

Переменные могут быть описаны в разделе описания переменных Var. разделов описания может быть до пяти, лучше их располагать в следующем порядке: Label, Const, Type, Var, functuon и procedure.

Если данное будет изменяться (по величине) в процессе выполнения программы, то имя этого данного описывается в разделе Var с соответствующим атрибутом:

Байтовый тип - byte;

Целый тип - integer;

Вещественный тип - real;

Булевский тип - boolean;

Символьный тип - char и т.д.

Пример:

Var

k n:integer;

S,T,Z: char;

a,b,c: real;

L25,L3: boolean;

FAZA: byte;

В этом случае все описанные идентификаторы можно применять в программе. Работа этого раздела будет заключаться в том, что машина выделит две ячейки памяти с именами k и n. В ячейках могут храниться только целые числа: в ячейках с именами S,T,Z - по одному символу; в ячейках a,b,c - только величины типа вещественных чисел; в L25 и L3 -величины true и FALSE, а в ячейке с именем FAZA - только числа от 0 до 255. Если попытаться, например, в ячейку S поместить не символ, а число, то это приведет к ошибке, т.е. правильно S:= A; или S:= $; или S:= 1; однако неверно S:= 1 (1 - число в отличие от 1 - символа). Если в процессе выполнения программы данное не меняется, то его можно описать в разделе "Описания констант":

Const

A=36.74; B=true;

С=а;

Здесь тоже выделяются ячейки памяти с именами А,В,С для хранения заданных величин, которые не подлежат изменению.

Допустимо описание констант-выражений:

Const

М = (32.5 + 0.64) / 3.14;

Кроме того, машина "знает", чему равны константы е и ?.

Пример. Составить программу для вычисления выражения,

где величины R, а, S, L, K вводятся с клавиатуры.

Пусть k, l - целые числа, остальные - вещественные.

Program Prim2,

Var k,L:integer;

Y,R,a,S : real; {здесь для хранения результата y тоже}

{нужна ячейка памяти}

Begin writeln ('введите целое k,L,', 'действительные R,а,S');

{выдача на экран текста, указанного в кавычках; обратите внимание на правило переноса текста в операторе writeln:}

{если нужно перенести текст, то ставится закрывающий апостроф, затем запятая,}

END.

То же самое будет, если записать программу:

Program Prim2a;

Var k,L: integer, R,a,S:real;

Begin writeln ('введите целые k,L'); readln (k,L);

writeln ('введите вещественные r,S,a'); readln (R,S,a);

writeln(l-l/(l+sqr(ra/k))/(exp(2)/sqr(s)sqr(l+ra/l)),

readln; END.

Последний оператор writeln вначале вычислит арифметическое выражение, а затем выведет на экран его значение в виде числа. Если мы хотим, чтобы результат был в виде 'результат Y = число', то необходимо последний writeln написать в следующем виде:

writeln ('результат Y =',1-l/(l+sqr(ra/k))/exp(2)/sqr(s) sqr(l+ra/l)); тогда машина вначале выведет текст, взятый в апостроф, т.е. "результат Y=", а затем его значение.