Процедура ввода и вывода, управ-ие вводом-выводом. Оператор присваивания. Совмес-ть по присваиванию.

Процедура ввода:

1)с клавиатуры:

Type mas1=array [0..99]of integer;

Procedure vvod_kl (var n:integer; var a:mas1);

Var i:integer;

Begin

Write (‘кол-во эл-тов’);

Readln (n);

For i:=0 to n-1 do

Begin

Write (‘a [’,i,‘]?’);

Readln (a[i]);

End;

End.

2)случайным образом:

Type mas1=array [0..99] of integer;

Procedure vvod_sl(var n:integer; var a:mas1);

Var i:integer;

Begin

Write (‘кол-во эл-тов’);

Readln (n);

For i: =0 to n-1 do

a[i]:=-1000+random(2001);

End.

Процедура вывода:

Type mas1=array[0..99] of integer;

Procedure vivod(var n:integer; const a:mas1);

Var i:integer;

Begin

For i:=0 to n-1 do

Write(a[i]);

End.

Операторы служат для описания лог-их действий, j необходимо выполнить для решения задачи. Оператор присваивания:

Перем-ая := выражение.

Перем-и выражение д/б совместимого типа. Перем-ая, j-ая не присвоено знач-ие счит-ся неопред-ой. Перем-ая сохраняет присвоение ей знач-ие до следующего присваивания. Обладает св-вами: 1)пока перем-ой не присвоено знач-ие, эта перем-ая считается неоперделенной. 2)знач-ие прис-ой перем-ой сохр-ся вплоть до нового присв-ия. 3)новое знач-ие перем-ой стирает старое. Тип выражения и тип перем-ой д/б совместимы. Оба типа явл-ся совмест-ыми, если выпол-ся одно из условий: а)оба типа явл-ся тождест-ми. б)оба типа явл-ся совместимыми порядковыми типами, знач-ие второго типа лежит в интервале знач-ия первого типа. в) оба типа явл-ся вещест-ыми. г)первый тип - вещ-ый, второй - целый. д)оба типа явл-ся строковыми типами. е)первый тип строковый, второй - симв-ый. ж)оба типа явл-ся совметимыми мн-вами. з)оба типа - совместимые типа указатели.