Перейти до основного контенту

Як вивести масив рядок за рядком в паскаль: керівництво і приклади коду

4 хв читання
2401 переглядів

Паскаль є статично типізованою мовою, в якій кожна змінна повинна бути оголошена відповідним чином перед її використанням. Він також підтримує різні типи даних, включаючи цілі числа, дійсні числа, символи та рядки.

Мова Паскаль має синтаксис, заснований на блоках коду, в яких оголошуються змінні, визначаються оператори і функції. Всі оператори повинні бути укладені в begin і end, а оператори всередині блоку повинні бути розділені крапкою з комою.

ОператорОпис
if-then-elseУмовний оператор, що виконує певні дії, залежно від умови
forЦикл, що виконує певний набір дій задану кількість разів
repeat-untilЦикл, що виконує певний набір дій, поки не буде виконано задану умову
while-doЦикл, що виконує певний набір дій, поки виконується задана умова

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

Одним з головних достоїнств Паскаля є його сувора типізація, це дозволяє виявити багато помилок програмування на ранній стадії розробки. Однак деякі програмісти вважають його занадто обмеженим і складним для швидкого прототипування.

Як оголосити та заповнити масив у Паскалі

У мові Паскаль для оголошення і заповнення масиву необхідно виконати кілька кроків:

  1. Оголосити змінну-масив із зазначенням його розмірності. Наприклад, var arr: array[1..5] of Integer; оголошує масив arr розміром 5 елементів типу Integer.
  2. Використовувати цикл для заповнення кожного елемента масиву. Наприклад:
vararr: array[1..5] of Integer;i: Integer;beginfor i := 1 to 5 dobeginarr[i] := i;end;end.

В даному прикладі, масив arr буде заповнений значеннями від 1 до 5.

  • Зверніть увагу, що індекси масиву в Паскалі починаються з 1 (на відміну від деяких інших мов програмування, де індекси починаються з 0).
  • Також, тип елементів масиву повинен бути вказаний явно при оголошенні масиву.

Тепер ви знаєте, як оголосити і заповнити масив в мові Паскаль. Застосовуйте ці знання для роботи з масивами в своїх програмах!

Як вивести масив рядок за рядком у Паскаль за допомогою циклу

program OutputArray;vararr: array[1..5] of Integer;i: Integer;beginarr[1] := 10;arr[2] := 20;arr[3] := 30;arr[4] := 40;arr[5] := 50;for i := 1 to 5 dobeginwriteln(arr[i]);end;end.

Як вивести масив рядок за рядком у Паскаль за допомогою рекурсії

Потім викличте цю процедуру з масивом та початковим індексом:

var arr: array[0..4] of Integer = (1, 2, 3, 4, 5); begin PrintArrayRow(arr, 0); end.

В результаті виконання коду, кожен елемент масиву буде виведений на новому рядку:

1

2

3

4

5

Використання рекурсії дозволяє вивести масив рядково без явного вказівки всіх індексів і без використання циклів.

Як вивести масив рядково в Паскаль з використанням процедур

program PrintArray;constN = 5; // размерность массиваvarArr: array[1..N] of Integer;procedure PrintArrayLineByLine(Arr: array of Integer; Size: Integer);vari: Integer;beginfor i := 0 to Size - 1 dowriteln(Arr[i]);end;begin// заполнение массива значениямиfor i := 1 to N doArr[i] := i * 10;// вызов процедуры для печати массива построчноPrintArrayLineByLine(Arr, N);end.

При запуску програми буде виведено наступне:

1020304050

Таким чином, ви можете вивести масив рядок за рядком у Паскаль, використовуючи процедури, які друкують кожен елемент масиву на новому рядку.

Приклад 1:

vararr: array[1..5] of Integer;i: Integer;beginarr[1] := 10;arr[2] := 20;arr[3] := 30;arr[4] := 40;arr[5] := 50;for i := 1 to 5 dobeginwriteln(arr[i]);end;end.

Приклад 2:

vararr: array[1..3, 1..3] of Integer;i, j: Integer;beginarr[1, 1] := 1;arr[1, 2] := 2;arr[1, 3] := 3;arr[2, 1] := 4;arr[2, 2] := 5;arr[2, 3] := 6;arr[3, 1] := 7;arr[3, 2] := 8;arr[3, 3] := 9;for i := 1 to 3 dobeginfor j := 1 to 3 dobeginwriteln(arr[i, j]);end;end;end.

Приклад 3:

vararr: array[1..5] of Integer;num: Integer;beginarr[1] := 10;arr[2] := 20;arr[3] := 30;arr[4] := 40;arr[5] := 50;for num in arr dobeginwriteln(num);end;end.