Есть ответ 👍

Дан массив из n элементов. найти сумму отрицательных элементов с четными индексами и отдельно с нечетными. (паскаль) 9 класс

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

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


Var n,i,s1,s2: integer; a: array [1..32767] of integer; begin readln(n); s1: =0; s2: =0; for i: =1 to n do read(a[i]); for i: =1 to n do begin if (a[i]< 0) and (i mod 2=0) then s1: =s1+a[i] end; for i: =1 to n do begin if (a[i]< 0) and (i mod 2< > 0) then s2: =s2+a[i] end; writeln(s1); writeln(s2); end.

третье по мойму.Я люблю когда волосатые мужики обмазываются маслом

Популярно: Информатика