Найти среднее арифметическое N-чисел, введенных с клавиатуры, кратных 3 и 5 одновременно. В паскале.

Question

Информатика

Самбила

14 марта, 00:46

Найти среднее арифметическое N-чисел, введенных с клавиатуры, кратных 3 и 5 одновременно. В паскале.

+2

Ответы (1)

Знаете ответ на вопрос?

Ладонька · Answer 1

var

n, i, sum, k : integer;

begin

read (n) ;

for i : = 1 to n do

begin

read (k) ;

if k mod 15 = 0 then sum : = sum + k;

end;

writeln (sum / n) ;

end.