Відповідь:
Пояснення:
program Main;
const
N = 5; // размер матрицы
k = 2; // заданное число
var
matrix: array[1..N, 1..N] of Integer;
i, j: Integer;
begin
// заполнение матрицы случайными числами
for i := 1 to N do
for j := 1 to N do
matrix[i, j] := Random(100); // генерация случайного числа от 0 до 99
// вывод элементов главной диагонали, разделенных на k
Write(matrix[i, i] div k, ' ');
Readln;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Відповідь:
Пояснення:
program Main;
const
N = 5; // размер матрицы
k = 2; // заданное число
var
matrix: array[1..N, 1..N] of Integer;
i, j: Integer;
begin
// заполнение матрицы случайными числами
for i := 1 to N do
for j := 1 to N do
matrix[i, j] := Random(100); // генерация случайного числа от 0 до 99
// вывод элементов главной диагонали, разделенных на k
for i := 1 to N do
Write(matrix[i, i] div k, ' ');
Readln;
end.