Лабораторный практикум "Программирование дополнительных элементов (строк, столбцов и диагоналей) матрицы" 9 класс


Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 1
1. Вычислить сумму элементов главной диагонали матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=15
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов побочной диагонали матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*}=3640
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент 4-ой строки матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=20
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент 3-го столбца матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=3
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 2
1. Вычислить сумму побочной диагонали матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=15
1
2
3
4
5
6
7
8
9
2. Найти произведение главной диагонали матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*…*}=1056
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент 1-го столбца матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=21
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент 6-ой строки матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=31
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 3
1. Вычислить сумму элементов 1-ой строки матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=6
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов 4-го столбца матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*}=6144
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент главной диагонали матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=25
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент побочной диагонали матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=6
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 4
1. Вычислить сумму элементов 2-го столбца матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=15
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов главной диагонали матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*}=1056
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент побочной диагонали матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=21
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент над главной диагональю матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=2
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 5
1. Вычислить сумму элементов главной диагонали матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=15
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов побочной диагонали матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*}=3640
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент над главной диагональю матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=20
1
2
3
4
5
6
7
8
9
10
11
12
13
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент под главной диагональю матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=7
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 6
1. Вычислить сумму элементов под главной диагональю матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=19
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов 3-ей строки матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*}=3640
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
3. Определить максимальный элемент 5-го столбца матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=25
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент главной диагонали матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=1
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 7
1. Вычислить сумму элементов над главной диагональю матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=11
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов под главной диагональю матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…*…*…*…}=1228500
1
2
3
4
5
6
7
8
9
10
11
13
14
15
16
3. Определить максимальный элемент 5-ой строки матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=25
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент 6-го столбца матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=6
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 8
1. Вычислить сумму элементов побочной диагонали матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: S={++}=15
1
2
3
4
5
6
7
8
9
2. Найти произведение элементов над главной диагональю матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: P={*…*…*…*…*…}=16128
1
2
3
4
5
6
7
8
9
10
11
13
14
15
16
3. Определить максимальный элемент под главной диагональю матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Max=24
1
2
3
4
5
6
7
8
9
10
11
12
13
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать минимальный элемент 2-ой строки матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Min=7
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 9
1. Вычислить произведение элементов над главной диагональю матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…}=72
7
4
9
1
6
2
8
3
9
2. Найти сумму элементов под главной диагональю матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: S={…+…+…+…+…+…}=66
1
2
3
4
5
6
7
8
9
10
11
13
14
15
16
3. Определить минимальный элемент 5-ой строки матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Min=21
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать максимальный элемент 6-го столбца матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{…..}, I, J: integer;
begin
for I:=1 to N do
for J:=1 to N do
readln (D[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………= ', {……});
readln;
end.
Входные данные: Выходные данные: Max=36
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Класс ________
Фамилия имя ______________________
Лабораторный практикум
Тема: «Программирование дополнительных элементов
(строк, столбцов и диагоналей) матрицы»
9 класс
Вариант – 10
1. Вычислить произведение элементов побочной диагонали матрицы А (3, 3).
var
A: Array [1..3, 1..3] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 3 do
for J:=1 to 3 do
readln (A[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ('……........................ ', {…..});
readln;
end.
Входные данные: Выходные данные: P={…*…*…}=105
8
9
7
4
5
6
3
2
9
2. Найти сумму элементов над главной диагональю матрицы В (4, 4).
var
В: Array [1..4, 1..4] of integer;
{…..}, I, J: integer;
begin
{……………..};
for I:=1 to 4 do
for J:=1 to 4 do
readln (В[I, J]);
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: S={…+…+…+…+…+…}=36
1
2
3
4
5
6
7
8
9
10
11
13
14
15
16
3. Определить минимальный элемент под главной диагональю матрицы С (5,5).
var
C: Array [1..5, 1..5] of integer;
{…..}, I, J: integer;
begin
for I:=1 to 5 do
for J:=1 to 5 do
readln (C[I, J]);
{……………..};
{……………………………}
{……………………………}
{……………………………………...}
writeln ( '…………………..= ', {…..});
readln;
end.
Входные данные: Выходные данные: Min=6
1
2
3
4
5
6
7
8
9
10
11
12
13
15
16
17
18
19
20
21
22
23
24
25
4. Напечатать максимальный элемент 2-ой строки матрицы D (6,6).
var
D: Array [1..6, 1..6] of integer;
{