Программа запрашивает у пользователя количество чисел, которое он будет вводить с клавиатуры. После этого пользователь вводит числа,а компьютер находит среднее арифметическое только для положительных чисел

Question

Программа запрашивает у пользователя количество чисел, которое он будет вводить с клавиатуры. После этого пользователь вводит числа,а компьютер находит среднее арифметическое только для положительных чисел

Гость

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

Accepted Answer

Programe pp;var a,b,c:integer;beginwriteln('введите количество чисел');read(a);c:=0for a=0 do begina:=a-1;writeln('введите число');read(b);if b>0 thenc:=c+belseWriteln('положительное число')end;writeln(c);end.