- •Лабораторна робота №1 освоєння методики роботи на персональних машинах. Особливості роботи з тр
- •Команди екранного редактора.
- •Лабораторна робота № 2 програми лінійної структури
- •Пріоритети виконання операцій
- •Лабораторна робота №3 розгалужені обчислювальні процеси
- •Варіанти завдань.
- •Лабораторна робота №4 програмування циклічних обчислювальних процесів
- •Теоретичні відомості
- •{ Приклад №3
- •Лабораторна робота №5 табулювання функції
- •Організація циклу з відомою кількістю повторень
- •{ Приклад №4
- •Лабораторна робота №6 одномірний масив
- •{ Приклад №5
- •Лабораторна робота № 7 двовимірний масив
- •Теоретичні відомості
- •Задання елементів масиву.
- •2) Порядково.
- •{ Приклад №6
- •Лабораторна робота № 8 процедури тp-програми
- •Теоретичні відомості
- •Лабораторна робота № 9 функції тp-програми
- •Теоретичні відомості
- •Література
Лабораторна робота №6 одномірний масив
МЕТА РОБОТИ: освоїти методику розробки програм для обробки одномірного масиву.
ТЕОРЕТИЧНІ ВІДОМОСТІ
Масив - це структурований тип даних, який складається з фіксованої кількості елементів, що мають однаковий тип. Доступ до кожного окремого елементу здійснюється шляхом індексування елементів масиву.
В математиці і інформатиці масив називається одномірним, якщо для отримання доступу до його елементів достатньо однієї індексної змінної.
В ТР - формат оголошення одномірного масиву має вигляд:
-
VAR <ім’я масиву>:array[поч.індекс..кін.індекс] of <тип даних> ;
Тип індексів може бути довільним простим типом, крім real. Ім’я масиву є спільним для всіх елементів цього масиву.
Після опису масиву кожний його елемент можна обробляти, вказавши ідентифікатор <ім’я масиву> і індекс елемента в квадратних дужках. Наприклад, запис MAS[2] дозволяє звертатися до 2-го елемента масиву Mas.
ТР не має засобів вводу-виводу елементів масиву зразу, тому ввід або вивід значень відбувається поелементно за допомогою оператора read або readln з використанням оператора організації цикла for.
*простий ввід даних
for i:=1 to n do
readln(A[i]);
*ввід даних з виводом на екран повідомлення про номер елемента
for i:=1 to n do Begin
write (‘ввестиA[’,i:1,’]=’);
readln(A[i]); end;
Вивід значень елементів масиву виконується аналогічно, але при цьому використовуються оператори write або writeln.
ЗАВДАННЯ 6.
-
Ознайомитися із теоретичним матеріалом по даній лабораторній роботі.
-
Набрати на ЕОМ наступну програму :
{ Приклад №5
Формулювання задачі. Перетворити одномірний масив A(a[1],a[2],…,a[n]) за таким законом : a[i]=a[1]+a[2]+…+a[i],i=1,2,3,…,n.}
program peretvormas;
var a, b : array [1..n] of real;
S : real;
j, i, n, m : integer;
begin
{ввід масиву}
write(‘Ввести розмір масиву А (<=25):’);
readln(n);
write(‘Ввести поелементно масив А:’);
for i:=1 to n do read (a[i]) ;
readln;
{перетворення масиву за заданим законом}
for i:=1 to n do begin
S:=0;
for j:=1 to i do
S:=S+a[j];
b[i]:=S;
end;
{вивід перетвореного масиву на екран}
writeln(‘Перетворений масив А:’);
for j:=1 to n do write (b[i]:3:1);
writeln;
end.
3. Натиснути комбінацію клавіш 'ALT' + 'F9'. Якщо не виявлено помилок- натиснути комбінацію клавіш 'CTRL' + 'F9'. На екрані з'явиться повідомлення:
Ввести розмір масиву А (<=25):
4. Ввести розмір з клавіатури (в кінці вводу - 'ENTER'):
5
5. На екрані з'явиться наступне повідомлення:
Ввести поелементно масив А:
6. Ввести значення елементів масиву з клавіатури (в кінці вводу - 'ENTER'):
1 2 3 4 5
7. На екрані з'явиться результ виконання програми:
Перетворений масив А: 1.0 3.0 6.0 10.0 15.0
8. Одержаний результат переписати з відеотерміналу у звіт лабораторної роботи.
-
Виконати завдання згідно варіанту (Таблиця 3). Для цього змінити у даній програмі фрагмент, призначений для обробки масиву (групу операторів після коментаря: {перетворення масиву за заданим законом}).
-
Виконати пункти 3-8.
11. Звіт по виконаній лабораторній роботі здати викладачу.
Таблиця 3.
№ |
Умова задачі |
1 |
Знайти кількість елементів, значення яких належать відрізку (-5;20) і номери цих елементів. |
2 |
Знайти суму квадратів всіх елементів ,більших по абсолютній величині за 10, і їх кількість. |
3 |
Вивести на екран масив, елементами якого є часткові суми елементів вихідного масиву. |
4 |
Знайти значення найбільшого по абсолютному значенню елемента і його номер. |
5 |
Знайти середнє арифметичне від’ємних, додатних та елементів, що дорівнюють нулю. |
6 |
Знайти значення найбільшого елемента та його номер. |
7 |
Знайти середнє гармонійне елементів, які не дорівнюють нулю, і їх кількість. |
8 |
Знайти добуток відмінних від нуля елементів і їх к-ть. |
9 |
Знайти середнє арифметичне всіх чисел. |
10 |
Вивести на екран масив, відмінний від вихідного масиву тим ,що від’ємні елементи останнього замінені нулями. Порахувати к-ть таких елементів. |
11 |
Знайти середнє геометричне додатних елементів та їх значень. |
12 |
Знайти суму відмінних від нуля елементів з парними номерами і їх кількість, а також суму відмінних від нуля елементів з непарними номерами і їх кількість . |
13 |
Знайти середнє арифметичне елементів, що не перевищують 15 по абсолютній величині , і їх кількість . |
14 |
Вивести на екран масив, який складений з елементів вихідного масиву, поділених на абсолютне значення елемента, найбільшого за абсолютним значенням . |
15 |
Знайти суму квадратів елементів , значення яких належить відрізку (-15;20) , і їх кількість . |
16 |
Знайти середнє арифметичне елементів, значення яких належить інтервалу (-237;47) , і їх кількість . |
17 |
Знайти середнє арифметичне квадратів всіх елементів, більших за 2.5 по абсолютній , і їх кількості . |
18 |
Вивести на екран масив, відмінний від вихідного масиву тим , що від’ємні елементи останнього замінені нулями. Порахувати кількість таких елементів. |
19 |
Розмістити елементи за зростанням значень. |
20 |
Знайти середнє значення серед від’ємних елементів. |
21 |
Знайти кількість елементів, більших від числа . |
22 |
Розмістити елементи за спаданням значень. |
23 |
Розмістити елементи за спаданням значень. |
24 |
Знайти суму останніх семи елементів. |
25 |
Знайти номера від’ємних елементів. |
26 |
Серед шести останніх елементів знайти номер максимального елементу. |
27 |
Серед елементів, які мають парні номери, знайти середнє значення. |
28 |
Знайти максимальний елемент масиву. |
29 |
Знайти всі додатні елементи . |
30 |
Знайти модуль різниці максимального і мінімального елементів . |
Контрольні питання
1. Який масив називається одномірним?
2. Вкажіть особливості написання програм з використанням одномірних масивів.