Ввод и вывод элементов массивов

Ввод и вывод массивов осуществляется поэлементно. Часто это делают с помощью циклов (обычно используется цикл FOR).

Пример 21.

Ввести с клавиатуры значения элементов одномерного массива вещественного типа состоящего из 10 элементов. Вывести на экран массив. Написать программу.

program PR22;

var

A: array[1..10] of real;

k: integer;

begin

for k:=1 to 10 do

readln (A[k]);

for k:=1 to 10 do

writeln (A[k]); end.

Двумерные массивы (матрицы) можно вводить по строкам или по столбцам.

Пример 22.

Пусть требуется ввести массив А (3;4):

2-й столбец

а) ввод и вывод по строкам:

program PR22;

var

a:array [1..3, 1..4] of real;

i,j:integer;

begin

for i:=1 то 3

for j:=1 то 4

read (a[i,j]);

for i:=1 то 3

for j:=1 то 4

writeln (a[i,j]);

end.

б) ввод по столбцам

begin

for i:=1 то 4

for j:=1 то 3

read (а[j,i]); {изменён порядок индексов}

Пусть, например, требуется ввести матрицу

1 2 3 4

5 6 7 8

В варианте а) вводим числа в порядке 1,2,3,4,5,6,7,8 (после набора каждого числа нажимаем ENTER, запятые не вводятся)

В варианте б) вводим числа так: 1,5,2,6,3,7,4,8. Если этот порядок нарушить, то получатся разные матрицы, что в математических задачах приведет к ошибкам.