Щоб заповнити масив даними існує кілька способів:
· Безпосереднє привласнення значень елементам;
· Генерація і присвоювання значень за допомогою функції random;
· Введення значень елементів з клавіатури;
Приклад 1 - введення елементів одновимірного масиву з клавіатури
n = 20;
var
A. array [1..n] of Real;
Begin
Writeln ( 'Введіть елементи масиву:');
for i: = 1 to n do Read (A [i]);
Приклад 2 - заповнення масиву випадковими числами:
Алгоритм складається з двох частин:
· Запустити знову генератор випадкових чисел функцією Randomize.
· Згенерувати значення для всіх елементів масиву за допомогою функції random (N), де N - максимально можливе значення випадкового числа. Результат роботи функції Random повинен бути збережений в змінну.
// 1 - перезапускаємо генератор випадкових чисел
// 2 - генеруємо випадкове значення n
// 3 - генеруємо n елементів масиву
a [i]: = random (100); // кожен елемент прийме значення з інтервалу 0..99
Коротка інформація про використовувані стандартних процедурах і функціях:
Randomize - ініціалізує генератор випадкових чисел випадковим значенням (випадкове значення залежить від моменту перезапуску, тобто залежить від часу).
Random (Num) - повертає випадкове ціле число, що знаходиться в інтервалі 0. (Num-1) (Наприклад, якщо Num = 100 (як в нашому прикладі), то Random повертає числа в інтервалі від 0 до 99). якщо Num<=0, то Random всегда будет возвращать 0. Чтобы получить значения в интервале, отличном от [0..Num-1], необходимо к значению, возвращаемому Random, прибавить смещение начала интервала.
Приклад 1: необхідний інтервал [-50. 50].
Довжина інтервалу 101, зміщення початку інтервалу -50.
Приклад 2: необхідний інтервал [20. 30].
Довжина інтервалу - 11, зміщення початку інтервалу 20.
Приклад 3: необхідний інтервал [-1000. -500]
Довжина інтервалу 501, зміщення початку інтервалу -1000
Так як масиви є складним типом даних, то далеко не у всіх мовах програмування є способи для виведення масивів на екран. Для того, щоб відобразити масив на екрані в мові Паскаль потрібно послідовно вивести на екран всі елементи масиву. Найпростіший спосіб - використовувати для цього цикл, який буде послідовно перебирати всі елементи масиву і роздруковувати їх на екран:
A. array [1..n] of Real;
Writeln ( 'Висновок елементів масиву:');