Контрольні питання

1. Яке призначення операторів циклу?

2. Вкажіть особливість оператора циклу з параметром.

3. Чи можна змінювати програмним шляхом параметр циклу циклічної частини оператора FOR?

4. Чому дорівнює крок зміни параметра циклу в операторі for?

5. Складіть програму обчислення f=n, використовуючи оператор циклу for, у якому параметр циклу змінюється на -1.

6. Знайти помилки в такому фрагменті програми:

а) y:=0; for x:=0.1 to 0.9 do y:= y+sin(x);

б) k:=81; y:=1; for i:=1 to sqrt(k) do k:=k*i;

Література: [1-4].

Завдання 4 Робота з одновимірними масивами чисел Короткі теоретичні відомості

Масив − це структурований тип даних, що складається з фіксованого числа елементів, що мають один і той самий тип. Елементами масиву можуть бути дані будь-якого типу, включаючи структуровані. Тип елементів масиву називається базовим. Число елементів масиву фіксується при описі та в процесі виконання програми не міняється.

Масив − це пронумерована сукупність елементів одного типу.

Масив називається одновимірним (вектором), якщо кожному елементу масиву відповідає один порядковий номер: форма запису: А[i],

де А − ім’я масиву, i − номер (індекс) елемента у рядку.

Якщо кількість елементів масиву дорівнює n, тоді масив має вигляд:

A[1] A[2] A[3] … A[n],

де i змінюється від 1 до n, n − ціле.

Доступ до кожного окремого елемента масиву здійснюється шляхом індексування елементів масиву. Індекси являють собою вирази будь-якого скалярного типу, окрім речового. Тип індексу визначає межі зміни значень індексу. Для опису масиву призначене словосполучення ARRAY OF… (масив з…).

Масив може бути описаний такими способами:

• із зазначенням типу в розділі описів:

TYPE <ім'я типу>=ARRAY [тип індексу] OF <тип компонент>;

VAR <ім'я масиву, ...> : <ім'я типу>;

• без зазначення типу в розділі опису типів даних:

VAR <ім'я масиву, ...> : ARRAY[тип індексу] OF <тип компонент>;

тут ARRAY (масив), OF (з) − службові слова; [тип індексу] − будь-який простий тип, окрім речового; <тип компонент> − тип елементів масиву допустимий у Pascal [1].

Приклади опису одновимірних масивів:

TYPE

klass=1..10;

znak=ARRAY [l..255] OF Char;

VAR

Ml: znak; {тип Znak заздалегідь описаний}

M2: ARRAY[1..60] OF integer; {прямий опис масиву}

M3: ARRAY[1..4] OF klass;

MASS: ARRAY [l..4] OF integer;

Розглянемо приклади програм.

Приклад 4.1. Обчислити суму п'ятнадцяти цілих чисел.

Для позначення чисел введемо змінну x типу масив, елементи якого мають індекс i. Для позначення суми введемо змінну Sum.

program prim4l;

var x: array[1..15] of integer;

i: integer; Sum: integer;

begin

Sum:=0;

for i:=l to 15 do begin

write('Введіть x[', i']='); readln(x[i]);

Sum:=Sum+x[i] end

writeln('Сума рівна ', Sum)

end.

Приклад 4.2. Знайти мінімальний і максимальний елементи одновимірного масиву, а також підрахувати кількість нулів.

program prim42;

type Mass = array[1..13] of real; {опис типу Mass як масиву з 13 елементів }

{дійсного типу }

var а: Mass; {опис змінної а типу Mass }

min, max : real; i, summa0: integer;

begin

writeln('Введіть елементи масиву :');

for i:=l to 13 do { Введення елементів масиву }

read(a[i]);

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

summa0:=0;

for i:=2 to 13 do begin

if a[i]>max then max:=a[i];

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

if a[i]=0 then summa0:=summa0+l;

end;

writeln('max=', max :5:2', min=', min :5:2, ' summa0=', summa0);

end.