Ввести двумерный массив А(3х4) . Определить в нём количество
10-11 класс
|
элементов, квадрат которых больше 25
uses crt;
const n=3;
m=4;
var a:array[1..n,1..m] of integer;
i,j,k:integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
readln(a[i,j]);
writeln;
end;
writeln;
k:=0;
for i:=1 to n do
for j:=1 to m do
if (a[i,j]*a[i,j]>25)then inc(k);
writeln(k);
end.
Другие вопросы из категории
Сколько различных решений имеет система
уравнений
корень иначе возвести его в квадрат результат вывести на экран
Читайте также
2. Задать двумерный массив (4х4) случайными значениями от 12 до 18 включительно. Вывести сумму значений элементов каждого столбца матрицы.
3. Задать двумерный массив (7х7) случайными значениями от 12 до 18 включительно. В каждом столбце матрицы найти количество элементов, значения которых меньше 14.
4. Задать двумерный массив (3х3) с клавиатуры, поменять значения элементов 1 столбца со вторым.
5. Найти минимальный элемент матрицы (5х5), заданной случайными значениями от 1 до 5 включительно, лежащие ниже главной диагонали.
значением Х (Х-задаётся пользователем).