Помогите пожалуйста!!! Вычислить суммы квадратов нечётных чисел случайно сгенерированных...

0 голосов
29 просмотров

Помогите пожалуйста!!!
Вычислить суммы квадратов нечётных чисел случайно сгенерированных двумерным массивом (от 1 до 100)


Информатика (28 баллов) | 29 просмотров
0

Ну, нам так сказал учитель

0

ну сложи все нечетные и возведи в квадрат

0

Я бы с удовольствием, но я в информатике дуб дубом

Дано ответов: 2
0 голосов
Правильный ответ
// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
  var n:=ReadInteger('n=');
  var a:=MatrixRandom(n,n,1,100);
  for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do Write(a[i,j]:4);
    Writeln
    end;
  var s:=0;
  foreach var x in a do
    if x.IsEven then s+=x*x;
  Writeln('Сумма квадратов нечетных ',s);
end.

Пример
n= 5
  79  56   2  39  24
  16  91  85  61   6
  59  61  47   9  52
  71   9  43  81  66
  57  55   7  82  97
Сумма квадратов нечетных 17792

(150k баллов)
0 голосов

Какой язык програмирования?

(34 баллов)
0

вот c++

0

int n;

0

cin>>n; int m; cin >> m

0

У меня Pascal

0

Pascal ABC

0

тогда ххэ

0

Жаль