Дан одномерный массив вещественных чисел
произвольной размерности. Определить сумму тех
элементов, которые находятся на четных местах.
Надо программу написать в паскале

Katya230606 Katya230606    2   18.05.2020 16:45    1

Ответы
dimalvov1993 dimalvov1993  14.10.2020 23:00

var a[1..10] of integer;

c, i:integer;

begin

c:=0;

for i:=1 to 10 do a[i]:= random(10);

for i:=1 to 10 do

if (i mod 2 = 0) then c:= c + a[i];

write(c);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика