profile
Опубликовано 5 лет назад по предмету Информатика от sofug6661

напишите программу нахождения суммы элементов массива а[1..15],порядковый номер которых является четным числом. массив заполняется произвольными числами в диапазоне да 100

  1. Ответ
    Ответ дан elenaklon
    var
    a:array [1..15] of integer;
    i,s:integer;
    begin
    for i:= 1 to 15 do
    a[i]:= Random(0,100);
    writeln(a);
    for i:=1 to 15 do
    if i mod 2 = 0 then s:=s+a[i];
    writeln(s);
    end.
Самые новые вопросы