Дан массив из N целых чисел. Найти сумму всех - вопрос №11826324 от renatamur200518 24.11.2021 15:27

Question

Информатика: Дан массив из N целых чисел. Найти сумму всех отрицательных чисел. Создать программу на Паскаль

renatamur200518 · Answer

var a: array [1..n] of integer;i,s:integer;begins:=0;for i:=1 to n do begin if a[i] 0 then s:=s+a[i]; end;end....