Составить проект. вычислить среднее арифметическое - вопрос №512697 от слизеринсязмейка 28.12.2020 00:43

Question

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

слизеринсязмейка · Answer

varc: array[1..30] of integer;i,n,k:integer;beginn:=0;k:=0;for i:=1 to 30 doreadln(c[i]); for i:=1 to 30 do beginif c[i] 0 then beginn:=n+1;k:=k+c[i];end;end;writeln( srednee= , k/n )end....