Регистрация
Дурачкао
16.11.2020 08:03
Информатика
Есть ответ 👍

Кто купит акк в стандофф 2 не дорого

111
248
Посмотреть ответы 1

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

steeg99
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

Популярно: Информатика