⇢ 
Денис Зайцев
Написать программу, которая вычисляет среднее арифметическое положительных элементов массива?
Помогите плиз, в С++ написать её надо)
мне в С++ нужно, а не в паскале
VI
Victori Ice
pascal:
var a: array [1..20] of integer;
i, k: integer;
s: real;
begin
// заполняем массив c клавиатуры
for i:=1 to 20 do
readln(ar);
//считаем среднеариф-е
s := 0;
k := 0;
for i:=1 to 20 do
if a >=0 then begin
s := s + a;
k := k + 1;
end;
writeln('среднее: ', s/k);
end.
ЮЧ
Юля Чагина
ну если надо, то пиши в личку 
за символическую плату сделаю
Похожие вопросы