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

Question

Информатика

Ждан

3 января, 16:08

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

+4

Ответы (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.