Дан линейный массив а[1..n], содержащий целые числа. вычислить сумму нечётных чисел.

277

416

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

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

mokeevayulichk48

Информатика

4,7(16 оценок)

Var a: array[1.. 1000] of integer; i,s: integer; begin write('введите размер массива n='); readln(n); s: =0; for i: =1 to n do if a[i]mod 2 =1 then s: =s+a[i]; writeln('сумма нечетных чисел массива равна ' , s); end.

Lala0911

Информатика

4,6(25 оценок)

// pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin writeln('*** исходная матрица ***'); var a: =matrrandom(4,3,-10,10); a.println(4); writeln(4*a.colcount*'-'); var s: =a.elementsbyrow; writeln('min=',s.min,', max=',s.max) end. пример *** исходная матрица *** -10 -10 -9 -8 -2 -2 -1 -2 -5 -6 6 -5 min=-10, max=6