Принцип действия оператора for

• первый раз <оператор>, составляющий тело цикла выполняется при <пар_цикла> : = <нач_знач>;

• второй раз тело цикла выполняется при <пар_цикла>: = <нач_знач>+ 1;

• последний раз тело цикла выполняется при пар_цикла>: = <кон_знач>;

29 Pascal. Одномерные массивы. Описание ввод-вывод элементов.

Массив – это набор объектов одного типа, у каждого из которых есть индекс (номер). При описании массива указывается общее число входящих в массив элементов и тип этих элементов.

Описание массив Z

Var Z :array[1..6] of real;

где Z – имя массива (любой идентификатор языка Pascal)

ARRAY… OF – служебные слова (массив, из);

[1..6] – тип-диапазон, определяющий количество элементов массива;

real – тип элементов, образующих массив;

описание двумерного массива

Const N1= 10; N2= 20;

Var Mas : array[1..N1,1..N2] of real;

Ввод массива 

Чтобы заполнить массив данными существует несколько способов:

.непосредственное присваивание значений элементам;

.генерация и присваивание значений с помощью функции random;

.ввод значений элементов с клавиатуры;

 ввод элементов одномерного массива с клавиатуры

program ff;

const n = 20;

var    A : array[1..n] of Real; begin Writeln('Введите элементы массива:');

for i:=1 to n do Readln(A[i]);

Readln; end.

Вывод одномерного массива

Program hh;

Const n = 20;

var    A : array[1..n] of Real; begin Writeln('Вывод эементов массива:');

for i:=1 to n do Write(A[i]:8:2);

Writeln; end.

30 Pascal.Двумерные массивы. Описание ввод-вывод элементов.

Массив – это набор объектов одного типа, у каждого из которых есть индекс (номер). При описании массива указывается общее число входящих в массив элементов и тип этих элементов.

описание двумерного массива

Const N1= 10; N2= 20;

Var Mas : array[1..N1,1..N2] of real;

Ввод массива 

Чтобы заполнить массив данными существует несколько способов:

.непосредственное присваивание значений элементам;

.генерация и присваивание значений с помощью функции random;

.ввод значений элементов с клавиатуры;

 ввод элементов одномерного массива с клавиатуры

Ввод двумерного массива

Program Lab10_1;

Const

N1=30;

N2=30;

Var M:array[1..N1, 1..N2] of integer;

i,n:integer;

Begin

writeln(‘введите количество строк массива’);

readln(N1);

writeln(‘введите кол-во столбцов массива’);

readln(N2);

writeln(‘введите Эл-ты массива:’);

For i:=1 to N1 do

For j:=1 to N2 do

Begin

31. паскаль.процедуры пользователяПри создании программ, в которых используются процедуры пользователя структура описания процедуры имеет вид(описание процедуры похоже на описание структуры программы):

Procedure<имя>;

Раздел описания(const,type,var)

Раздел описания внутренних процедур или функций(procedure,function)

Основной блок процедуры( begin, end). В заголовке процедуры обязательно должно присутствовать имя процедуры пользователя.

Директива компилятора

{$ I имя файла}, где I – сокращение от англ. Слова include

32. паскаль Функции представляют собой последовательность операторов, в результате выполнения которых вычисляется одно значение присваемое имени функции.

Function <имя>[(формальные параметры)]:<тип результат>;

<раздел описаний>

Begin

<раздел операторов функции>;

End;

В разделе операторов должен присутствовать, по крайней мере, один оператор, присваивающий имени функции значение. В точку вызова возвращается результат последнего такого присваивания.