Бағдарламалау технологиялары және тілдер

Массивті 2 түрде сипаттауға болады:

(array- массив). Квадрат жақшада массивтің бірінші және соңғы элементтерінің индексі жазылады.

Мысал: var a: array [1..10] of real;

b: array [0..50] of char;

c: array [-3..4] of integer;

а массиві 10, b массиві 51, с массивті 8 элементтен тұрады.

Type тип аты = array [массив индексінің аралығы] of элемент типі;

Var массив аты: типтің аты;

Мысал: type m1= array [1..15] of real;

m2= array [1..20] of integer;

var a:m1; b: m2;

Массивті типтер бөлімінде анықтау программаны оқуды көп жеңілдетеді және ол программалаудың жақсы тәсілі болып табылады.

Мысалдар қарастырайық:

Program m1;

Var a: array [1..10] of integer;

S, i, k integer; P: real;

begin

for i:=1 to 10 do

for i:=1 to 10 do

if a i0 then begin S:=S+a i; к:=к+1; end;

P:=S/k;

end.

Program m2;

Const n=20;

Var a: array [1..n] of real;

i, k, t: integer; max, min: real;

begin

readln (a [i] );

max:= a [1]; к:=1; min:= a [1]; t:=1;

for i:=2 to n do

begin

if max a [i] then begin max:=a [i]; к:=i; end;

end;

end.

Program m1;

Var a: array [1..10] of integer;

i, max, min, k integer;

begin Randomize;

for i:=1 to 10 do

a [i]:=random (10); массивті кездейсоқ сандармен толтыру

max:= a [1]; min:= a [1];

for i:=2 to n do

begin

if min a [i] then min:=a [i];

end; k:=max- min;

Writeln ('айырма=', k)

end.