Задача 1. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 100.
Вывести массив на экран. Найти максимальный и минимальный элементы массива.
const n=10;
var i, j : integer;
mas: array[1..n, 1..n] of integer;
begin
randomize;
for i:= 1 to n do
for j:= 1 to n do
mas[i, j]:= random(100);
for i:= 1 to n do
begin
for j:= 1 to n do
write(mas(i, j):5);
end;
writeln();
{блок решения задачи}
end.
Задача 2. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50.
Вывести массив на экран. Посчитать количество четных элементов массива.
Задача 3. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50.
Вывести массив на экран. Вычислить сумму элементов массива, меньших 10.
Вывести массив на экран. Найти максимальный и минимальный элементы массива.
const n=10;
var i, j : integer;
mas: array[1..n, 1..n] of integer;
begin
randomize;
for i:= 1 to n do
for j:= 1 to n do
mas[i, j]:= random(100);
for i:= 1 to n do
begin
for j:= 1 to n do
write(mas(i, j):5);
end;
writeln();
{блок решения задачи}
end.
Задача 2. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50.
Вывести массив на экран. Посчитать количество четных элементов массива.
Задача 3. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50.
Вывести массив на экран. Вычислить сумму элементов массива, меньших 10.