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

143

202

Посмотреть ответы 3

Ответы на вопрос:

steeg99

Информатика

4,5(37 оценок)

// 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