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

Question

49

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

в избранное ссылка

Знаете ответ?

dance · Accepted Answer

81

dance

27 февраля 2023

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.

комментировать

в избранное ссылка отблагодарить