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

найти сумму элементов стоящих на четных местах и элементов стоящих на нечетных местах в массиве: 3,7,-2,11,6,-3,91,-74,10

  1. Ответ
    Ответ дан pro100LiNa

    var a:array[1..100]of integer;
    i,n,s1,s2:integer;
    begin
    readln(n);
    for i:=1 to n do
    readln(a[i]);s1:=0;s2:=0;
    for i:=1 to n do
    if i mod 2=0 then s1:=s1+a[i];
    if i mod 2=1 then s2:=s2+a[i];
    writeln(s1,' ',s2);
    end.

Самые новые вопросы