Поделиться
72.docx
В блоке CONST можно описывать не только константы, но и переменные величины. Эти переменные величины из-за того, что они описаны в таком странном месте, приобретают неудачное название типизированные константы, но переменными быть не перестают, а самое для нас главное - здесь им можно удобно придавать начальные значения. Вот пример:
CONST n :Integer =800;
e :Real =2.7;
Вот как запишется программа для вычисления средней недельной температуры из 12.4, если массив t описать как типизированную константу:
CONST k =7; { k - обычная, нетипизированная константа}
t :array [1..k] of Integer = (-14, -12, -8, -2, 0, 1, -3);
{ t - типизированная константа}
VAR s,i :Integer;
BEGIN
s:=0;
for i:=1 to k do s:=s+t[i];
WriteLn(s/k)
END.
Здесь в круглых скобках задается список начальных значений переменной t, а именно: t[1] равно -14, t[2] равно -12 и т.д. В разделе операторов эти значения можно менять.
Двумерным массивам начальные значения придаются аналогично. Так в программе из 12.3 вместо двенадцати присвоений можно было записать так:
Const k =3; n=4;
t :array [1..k,1..n] of Integer = (( -8,-14,-19,-18),
( 25, 28, 26, 20),
( 11, 18, 20, 25));
.......
Обратите внимание на расстановку скобок.
Скачано с www.znanio.ru
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
