Паскаль – это один из самых популярных языков программирования, на котором можно написать различные программы. Он был разработан в 1970-х годах и по сей день активно используется.

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

Первый способ заключается в простом перечислении элементов массива с использованием цикла for. Например:

var
array: array[1..5] of integer = (1, 2, 3, 4, 5);
i: integer;
begin
for i := 1 to 5 do
writeln(array[i]);
end.

Как правильно вывести массив на Паскале: примеры и объяснение

Пример 1:

program PrintArrayExample1;

var

arr: array [1..5] of integer = (1, 2, 3, 4, 5);

i: integer;

begin

for i := 1 to Length(arr) do

writeln(arr[i]);

end.

Пример 2:

program PrintArrayExample2;

var

arr: array [1..5] of integer = (1, 2, 3, 4, 5);

i: integer;

begin

i := 1;

while i <= Length(arr) do

begin

writeln(arr[i]);

i := i + 1;

end;

Важно учитывать, что индексы массива в Паскале начинаются с единицы, поэтому в первом элементе используется индекс 1, а не 0, как принято в некоторых других языках программирования.

Пример 1:

В результате выполнения данного примера на экран будут выведены числа 10, 20, 30, 40 и 50, каждое на новой строке.

Пример 2:

В данном примере на экран будет выведены строки 'apple', 'banana' и 'orange', каждая на новой строке.

Важно помнить, что индексы элементов массива должны быть указаны корректно, чтобы избежать ошибок.

var
arr: array[1..5] of integer; // объявление одномерного массива
i: integer; // переменная для цикла
begin
for i := 1 to 5 do
end.

var
arr: array[1..3,1..3] of integer; // объявление двумерного массива
i, j: integer; // переменные для циклов
begin
i := 1; // начальное значение переменной i
while i <= 3 do // условие цикла
begin
j := 1; // начальное значение переменной j
while j <= 3 do // условие цикла
begin
j := j + 1; // изменение значения переменной j
end;
i := i + 1; // изменение значения переменной i
end;
end.

var
arr: array[1..5] of integer; // объявление одномерного массива
i: integer; // переменная для цикла
begin
for i := 1 to 5 do
end.

• Использование цикла for

  Самый простой способ вывести массив на экран - использовать цикл for. Ниже приведен пример кода:

  var
  array: array[1..5] of Integer;
  i: Integer;
  begin
  array[1] := 10;
  array[2] := 20;
  array[3] := 30;
  array[4] := 40;
  array[5] := 50;
  for i := 1 to 5 do
  begin
  WriteLn(array[i]);
  end;
  end;

• Использование цикла while

  Другой способ вывести массив на экран - использовать цикл while. Пример кода:

  var
  array: array[1..5] of Integer;
  i: Integer;
  begin
  array[1] := 10;
  array[2] := 20;
  array[3] := 30;
  array[4] := 40;
  array[5] := 50;
  i := 1;
  while i <= 5 do
  begin
  WriteLn(array[i]);
  i := i + 1;
  end;
  end;

• Использование процедуры или функции

  var
  array: array[1..5] of Integer;
  procedure PrintArray;
  var
  i: Integer;
  begin
  for i := 1 to 5 do
  begin
  WriteLn(array[i]);
  end;
  end;
  begin
  array[1] := 10;
  array[2] := 20;
  array[3] := 30;
  array[4] := 40;
  array[5] := 50;
  PrintArray;
  end;

• Использование рекурсии

  var
  array: array[1..2, 1..2] of Integer;
  procedure PrintArray(x, y: Integer);
  begin
  if x > 2 then
  Exit;
  if y > 2 then
  begin
  PrintArray(x + 1, 1);
  Exit;
  end;
  WriteLn(array[x, y]);
  PrintArray(x, y + 1);
  end;
  begin
  array[1, 1] := 10;
  array[1, 2] := 20;
  array[2, 1] := 30;
  array[2, 2] := 40;
  PrintArray(1, 1);
  end;