Cоставить программу вычисления суммы элементов массива состоящего из 16 случайных чисел, принадлежащих диапазону (-20; 80], стоящих на чётных местах.

294

374

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

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

ПростоМиха

Информатика

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

1. современное, короткое и быстрое решение // pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(16,-20,80); a.println; writeln('s=',a.where((x,i)-> i.isodd).sum) end. пример 61 64 70 22 76 22 18 44 36 53 29 -9 42 -19 66 34 s=211 2. а вот так все еще учат в большинстве школ (стиль образца 70-80х годов прошлого века) const n=16; var i,s: integer; a: array[1..n] of integer; begin randomize; s: =0; for i: =1 to n do begin a[i]: =random(101)-20; write(a[i],' '); if i mod 2=0 then s: =s+a[i] end; writeln; writeln('s=',s) end.