Определить в массиве среднее геометрическое элементов, у которых оба индекса нечетные

@Никифоровна · Регистрация: 22.11.2013

1) Ввести двумерный массив А 3х5. Определить в нём среднее геометрическое элементов, у которых оба индекса нечетные.
2) Ввести двумерный массив N M A × . Все элементы, которые при целочисленном делении на N дают ненулевое значение, увеличить на M .
Массив вывести до и после преобразования.

@mellowass · 24.12.2013, 22:59

1

Pascal

uses crt;
var a : array [1..3,1..5] of integer;
i,j,k : integer;
s: real;
begin
s:=1;
writeln('Ñàì ìàññèâ A: ');
for i:=1 to 3 do
for j:=1 to 5 do
begin
a[i,j]:=100;
if (i mod 2 <> 0) and (j mod 2 <> 0) then
begin
s:=s*a[i,j];
k:=k+1;
end;
end;
for i:=1 to 3 do
begin
for j:=1 to 5 do
write(a[i,j]:3);
writeln;
end;
writeln('  ñðåäíåå ãåîìåòðè÷åñêîå ýëåìåíòîâ, ó êîòîðûõ îáà èíäåêñà íå÷åòíûå = ',exp(ln(s)*(1/k)));
end.

@Никифоровна 0 / 0 / 0 Регистрация: 22.11.2013 Сообщений: 14
		1
	Определить в массиве среднее геометрическое элементов, у которых оба индекса нечетные 24.12.2013, 22:44. Показов 1639. Ответов 1 Метки нет (Все метки) 1) Ввести двумерный массив А 3х5. Определить в нём среднее геометрическое элементов, у которых оба индекса нечетные. 2) Ввести двумерный массив N M A × . Все элементы, которые при целочисленном делении на N дают ненулевое значение, увеличить на M . Массив вывести до и после преобразования. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Определить в массиве среднее геометрическое элементов, у которых оба индекса нечетные

Решение