Составить проект. вычислить среднее арифметическое отрицательных элементов массива с1, , пологая, что в массиве есть отрицательные значения. ( это нужно сделать в паскале.)

инкндкн инкндкн    2   31.03.2019 04:30    0

Ответы
anna18341 anna18341  27.05.2020 20:41

var
c: array[1..30] of integer;
i,n,k:integer;
begin
n:=0;
k:=0;
for i:=1 to 30 do
readln(c[i]);

for i:=1 to 30 do begin
if c[i]<0 then begin
n:=n+1;
k:=k+c[i];
end;
end;
writeln('srednee=', k/n )
end.

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