Тест двумерный массив паскаль

Список вопросов теста

Вопрос 1

В записи m[7,5]=9
m обозначает

Варианты ответов
  • имя массива
  • имя элемента массива
  • номер элемента массива
  • значение элемента массива
Вопрос 2

В записи m[4,3]=13
m[4,3] обозначает

Варианты ответов
  • имя массива
  • имя элемента массива
  • номер элемента массива
  • значение элемента массива
Вопрос 3

В записи m[4,3]=13
4 обозначает

Варианты ответов
  • имя массива
  • имя элемента массива
  • номер элемента массива
  • значение элемента массива
  • номер строки в котором находится элемент массива
  • номер столбца в котором находится элемент массива
Вопрос 4

В записи m[4,3]=13
3 обозначает

Варианты ответов
  • имя массива
  • имя элемента массива
  • номер элемента массива
  • значение элемента массива
  • номер строки в котором находится элемент массива
  • номер столбца в котором находится элемент массива
Вопрос 5

В записи m[4,3]=13
13 обозначает

Варианты ответов
  • имя массива
  • имя элемента массива
  • номер элемента массива
  • значение элемента массива
  • номер строки в котором находится элемент массива
  • номер столбца в котором находится элемент массива
Вопрос 6

Дан двумерный массив a размером 5*5
41 87 37 12 45
74 42 78 38 43
48 12 11 79 96
78 34 72 91 12
79 25 13 18 89
Чему равет элемент a[3,4]

Вопрос 7

Выберите правильное описание двумерного массива а из 5 строк и 4 стобцов, целого типа

Варианты ответов
  • var a:array[0..20] of integer;
  • var a:array[1..4,1..5] of integer;
  • var a:array[1..5,1..4] of integer;
  • var а:array[1..5,1..4] of real;
Вопрос 8

Что делает данный фрагмент задачи
For j:=1 to n do Write(a[4,j],’ ‘);

Варианты ответов
  • Вывод n-й строки
  • Вывод 4-й строки
  • Вывод n-го столбца
  • Вывод 4-го столбца
  • Вывод главной диагонали
  • Вывод побочной диагонали
Вопрос 9

Что делает данный фрагмент задачи
For i:=1 to n do Write(a[i,n-i+1,’ ‘]);

Варианты ответов
  • Вывод n-й строки
  • Вывод 4-й строки
  • Вывод n-го столбца
  • Вывод 4-го столбца
  • Вывод главной диагонали в строчку
  • Вывод побочной диагонали в строчку
Вопрос 10

Дан двумерный массив a размером 5*5
41 87 37 12 45
74 42 78 58 43
48 72 46 49 56
78 34 72 91 12
79 25 73 18 89
Что будет записано в переменную f
f:=a[3,1];
For k:=2 to 5 do if a[3,k]>f then f:=a[3,k];

лабораторные работы и задачи по программированию и информатике, егэ по информатике

Двумерный массив в Pascal

Матрица или двумерный массив – это прямоугольная таблица чисел (или других элементов одного типа). Каждый элемент матрицы имеет два индекса (номер строки и номер столбца).

Читайте также:  Asp net core iis

Исходные данные для решения многих задач можно представить в табличной форме:

Таблица результатов производственной деятельности нескольких филиалов фирмы может быть представлена так:

zavod1: array [1..4] of integer; zavod2: array [1..4] of integer; zavod3: array [1..4] of integer;

Или в виде двумерного массива так:

var A: array[1..3,1..4] of integer;

Описание, ввод и вывод элементов двумерного массива

Варианты описания двумерного массива

    Описание массива в разделе переменных:

const N = 3; M = 4; var A: array[1..N,1..M] of integer;

const M=10; N=5; type matrix=array [1..M, 1..N] of integer; var A: matrix;

for i:=1 to N do for j:=1 to M do begin write(‘A[‘,i,’,’,j,’]=’); read ( A[i,j] ); end;

Следующий фрагмент программы выводит на экран значения элементов массива по строкам:

for i:=1 to N do begin for j:=1 to M do write ( A[i,j]:5 ); writeln; end;

Рассмотрим следующую задачу: Получены значения температуры воздуха за 4 дня с трех метеостанций, расположенных в разных регионах страны:

Номер станции 1-й день 2-й день 3-й день 4-й день
1 -8 -14 -19 -18
2 25 28 26 20
3 11 18 20 25

Т.е. запись показаний в двумерном массиве выглядела бы так:

t[1,1]:=-8; t[1,2]:=-14; t[1,3]:=-19; t[1,4]:=-18;
t[2,1]:=25; t[2,2]:=28; t[2,3]:=26; t[2,4]:=20;
t[3,1]:=11; t[3,2]:=18; t[3,3]:=20; t[3,4]:=25;

Объявление двумерного массива:

var t: array [1..3, 1..4] of integer;

  1. Распечатать температуру на 2-й метеостанции за 4-й день и на 3-й метеостанции за 1-й день.
  2. Распечатать показания термометров всех метеостанций за 2-й день.
  3. Определить среднюю температуру на 3-й метеостанции.
  4. Распечатать, в какие дни и на каких метеостанциях температура была в диапазоне 24-26 градусов тепла.

Самостоятельно подумайте, как находится сумма элементов массива pascal.

const m = 5; n = 4; var a: array[1..m,1..n] of byte; s: array[1..n] of byte; i,j, sum: byte; begin randomize; for i := 1 to m do begin for j := 1 to n do begin . <инициализация элементов массива случайными числами>. <вывод элементов массива>end; writeln end; writeln (‘————‘); <для оформления> <обнуление значений массива суммы s[]:>. <поиск сумм элементов по столбцам:>for i := 1 to n do begin for j := 1 to m do begin s[i]:=. ; end; write(. ) ; end; <поиск общей суммы:>sum:=0; . <вывод массива значений сумм по столбцам:>. write (‘ | sum = ‘, sum); readln end.

Главная и побочная диагональ при работе с двумерными матрицами в Pascal

Главная диагональ квадратной матрицы n x n (т.е. той, у которой количество строк равно количеству столбцов) проходит с верхнего левого угла матрицы (элемент 1,1) до правого нижнего угла матрицы (элемент n,n).

Побочная диагональ квадратной матрицы n x n проходит с нижнего левого угла матрицы (элемент n,1) до правого верхнего угла матрицы (элемент 1,n).

Формулу поиска элементов диагоналей проще всего искать, нарисовав элементы матрицы:

1,1 1,2 1,3 1,4
2,1 2,2 2,3 2,4
3,1 3,2 3,3 3,4
4,1 4,2 4,3 4,4
Читайте также:  Acpi ven wst dev adef

Учитывая, что первая цифра в программе будет соответствовать счетчику i, а вторая — счетчику j, то из таблицы можно вывести формулы:

Главная диагональ матрицы в Паскаль имеет формулу:
i=j
Побочная диагональ матрицы в Паскаль имеет формулу:
n=i+j-1 (или j=n-i+1 )

где n — размерность квадратной матрицы

Решение:

var i,j,n:integer; a: array[1..100,1..100]of integer; begin randomize; writeln (‘введите размерность матрицы:’); readln(n); for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=random(10); write(a[i,j]:3); end; writeln; end; writeln; for i:=1 to n do begin for j:=1 to n do begin if (i=j) or (n=i+j-1) then a[i,j]:=0; write(a[i,j]:3) end; writeln; end; end.

var A:array[1..5,1..5] of integer; i,j:integer; sum,sum1,sum2:integer; begin randomize; for i:=1 to 5 do for j:=1 to 5 do A[i,j]:=random(10); write (‘Исходный массив A: ‘); for i:=1 to 5 do begin writeln; for j:=1 to 5 do write (A[i,j]:2,’ ‘); end; sum1:=0; for i:=1 to 5 do for j:=1 to 5 do if (i-j=1) then sum1:=sum1+A[i,j]; sum2:=0; for i:=1 to 5 do for j:=1 to 5 do if (j-i=1) then sum2:=sum2+A[i,j]; sum:=sum1+sum2; writeln; writeln(‘Сумма = ‘,sum); end.

  • минимальный элемент, лежащий ниже побочной диагонали;
  • произведение ненулевых элементов последней строки.
  • Рассмотрим еще один пример работы с двумерным массивом.

    var index1,index2,i,j,N,M:integer; s,min,f:real; a:array[1..300,1..300] of real; begin N:=10; M:=5; for i:=1 to N do begin for j:=1 to M do begin a[i,j]:=random(20); s:=s+a[i,j]; write(a[i,j]:3); end; writeln; end; f:=s/(N*M); writeln(‘srednee znachenie ‘,f); min:=abs(a[1,1]-f); for i:=1 to N do begin for j:=1 to M do begin if abs(a[i,j]-f) Поделитесь уроком с коллегами и друзьями:

    Какая ошибка допущена в выражении: с: array [1..10; 1..10] of byte ; ?

    Какое из присваиваний элементу массива d : array [1..10, 1..5] of byte ; является правильным?

    Сколько памяти занимает массив e: array [1..10,1..5] of char; ?

    Какое из объявлений двумерного массива правильное?

    a: array [1…n, 1…n] of real;

    a: array [ 1..n , 1..m] of real;

    a: aray [ 1..n , 1..m]: integer;

    Сколько элементов в массиве a: array [0..5, 0..10] of byte; ?

    Сколько памяти занимает массив b : array [0..5, 0..5] of byte; ?

    Сколько элементов в массиве a: array [-5..5, 1..5] of byte; ?

    Что определяет для массива X[1..n , 1..m] следующий алгоритм
    S := 0;
    For i := 1 to n do
    For j := 1 to m do
    If X[i, j ]

    минимальный элемент массива

    сумму отрицательных элементов массива

    максимальный элемент массива

    количество отрицательных элементов массива

    Что определяет для массива X[1..n , 1..m] следующий алгоритм
    For i := 1 to n do
    For j := 1 to m do
    If i mod 2 = 0 then X[i, j] := A;

    четные столбцы матрицы заменить на А

    четные строки матрицы заменить на А

    количество четных элементов массива

    нечетные строки матрицы заменить на А

    Читайте также:  Как добавить стрелку в автокаде

    Что определяет для массива X[1..n , 1..n] следующий алгоритм
    S := 0;
    For i := 1 to n do
    For j := 1 to n do
    If i = n — j + 1 then S := S + X[i, j];

    сумма элементов главной диагонали матрицы

    сумма элементов четных столбцов

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

    количество элементов побочной диагонали матрицы

    Что определяет для массивов X[1..n , 1..m] и Y[1..n , 1..m] следующий алгоритм
    For i := 1 to n do
    For j := 1 to m do X[i, j] := X[i, j] + Y[i, j];

    сумма элементов каждой строки матриц X и Y

    количество равных соответствующих элементов матрицы X и матрицы Y

    сумма элементов главной диагонали матрицы

    сумма матриц X и Y

    Что определяет для массива X[1..n , 1..m] следующий алгоритм
    V := 0;
    For i := 1 to n do
    For j := 1 to m do
    If X[i, j] = T then V := V + 1;

    сумма элементов каждой строки матриц X и Y

    количество элементов матрицы, равных Т

    количество равных элементов матрицы X

    количество элементов матрицы X не равных Т

    Чему будут равны элементы этого массива после выполнения фрагмента программы?

    for i := 0 to 9 do A[i] := 9 — i;
    for I := 0 to 4 do
    begin
    k := A[i];
    A[i] := A[9 — i];
    A[9 — i] := k;
    end;

    9 8 7 6 5 4 3 2 1 0

    0 1 2 3 4 5 6 7 8 9

    9 8 7 6 5 5 6 7 8 9

    0 1 2 3 4 4 3 2 1 0

    Значения элементов двумерного массива A[1..10, 1..10] задаются с помощью следующего фрагмента программы:
    for i := 1 to 10 do
    for k := 1 to 10 do
    if i > k then A[i,k] := 1
    else A[i,k] := 0;
    Чему равна сумма элементов массива после выполнения этого фрагмента программы?

    Значения элементов двумерного массива A[1..10, 1..10] сначала равны 5. Затем выполняется следующий фрагмент программы:
    for i := 1 to 5 do
    for j := 1 to 4 do
    begin

    A[i,j] := A[i,j] + 5;
    A[j,i] := A[j,i] + 5;
    e nd;
    Сколько элементов массива будут равны 10?

    Все элементы двумерного массива A размером 10х10 элементов первоначально были равны 0. Затем значения элементов меняются с помощью вложенного оператора цикла в представленном фрагменте программы:
    for n := 1 to 4 do
    for k := n to 4 do
    begin

    A[n,k] := A[n,k] + 1;
    A[k,n] := A[k,n] + 1;
    end;
    Сколько элементов массива в результате будут равны 1?

    В программе описан одномерный целочисленный массив с индексами от 0 до 10. В приведенном ниже фрагменте программы массив сначала заполняется, а потом изменяется:
    for i := 0 to 10 do A[i] := i — 1;
    for i := 1 to 10 do A[i-1] := A[i];
    A[10] := 10;
    Как изменяются элементы этого массива?

    все элементы, кроме последнего, окажутся равны между собой

    все элементы окажутся равны своим индексам

    все элементы, кроме последнего, сдвигаются на один элемент вправо

    все элементы, кроме последнего, уменьшаются на единицу