Ввод/вывод значений элементов матрицы

 

Заполнение элементов матрицы с клавиатуры

program zadacha1;

{ввод - с клавиатуры, вывод - в столбик }

var

а: аrray [1..10,1..10] of real

i, j: integer;

begin

for i: =1 to 10 do

for j: =1 to 10 do

begin

readln (a[i,j]);

writeln (‘a(‘, i, ‘.,’,.j,’)=’, a[i,j]){вывод -в столбик}

епd.

Пример программы ввода-вывода матрицы

Заполнение элементов матрицы по формуле

program zadacha2;

{ввод - по формуле, вывод - таблицей }

var

а: аrray [1..10,1..10] of real;

i, j: integer;

begin

for i: =1 to 10 do begin

for j: =1 to 10 do begin

begin

а[i,j]: = (i+0.5)/(j+sin(j)); {ввод – по формуле}

write (a[i,j], ‘ ‘]) {вывод - таблицей}

епd;

writeln

епd;

епd;

епd.

 

Заполнение элементов матрицы случайными числами

program zadacha3;

{ ввод случайных чисел, вывод - в строчку}

var

а: аrray [1..10,1..10] of integer;

i, j: integer;

begin

randomize; {оператор, позволяющий генерировать новую}

{последовательность случайных чисел при}

{новом запуске программы на выполнение}

for i: =1 to 10 do

for j: =1 to 10 do

begin

а[i,j]: = random (30); {генерация случайного числа от 0 до x-1,

{в данном случае, от 0 до 29}

write (‘a(‘,I, ‘,’,j,’)=’, a[i,j])

епd;

епd.

 

Вывод массива

Варианты вывода массива:

 

 

Типовые задачи на матрицы

 

Суммирование значений элементов матрицы

Дана матрица А(1,15), заполненная датчиком случайных чисел. Найти сумму значений всех элементов данной матрицы.

 

 

Нахождения количества значений элементов матрицы

Дана матрица А(10,20), заполненная датчиком случайных чисел в диапазоне от -10 до 19 включительно. Подсчитать количество положительных значений элементов каждой строки матрицы.

program zadacha

{кол-во знач. элементов в каждой строке матрицы}

var

а: аrray [1..10,1..20] of integer;

i, j,k: integer;

begin

randomize;

for i: =1 to 10 do

begin

k:=0

for j: =1 to 20 do

begin

а[i,j]: = random (30)-10;

if a[i,j]>0 then k:=k+1

епd;

writeln ('кол-во полож. знач. в', i, ' строке=',k);

епd;

епd.

 

Поиск элементов массива

В одномерном массиве М, состоящем из N целых чисел, найти элементы, значения которых равны заданному числу k.

Исходными данными являются:

- массив целых чисел М,

- число для поиска k.

Результат:

- номера элементов массива, значения которых равны заданному числу.

Схема программы данного примера представлена на рисунке.

 

 

 

 

Примечание: подобная задача может быть поставлена для двумерных массивов и массивов большей размерности (с использованием при вводе и обработке данных вложенных циклов).

Нахождение экстремумов

4-1 Дана прямоугольная матрица А(10,15), заполненная случайными числами в диапазоне от 0 до 29 включительно. Найти максимальное значение элементов данной матрицы.

4-2 В задачах обработки массивов часто встречается необходимость одновременного поиска экстремальных элементов массива (с минимальным и максимальным значениями).

Исходными данными являются:

- массив целых чисел М.

Результат:

- минимальный элемент Мin1,

- максимальный элемент Мах1.

Схема программы поиска экстремальных элементов массива приведена на рисунке.