• Найти среднее арифметическое n-чисел ,вводимых с клавиатуры. помогите пожалуйста))) надо в паскале сделать)

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

     

    • Автор:

      lilah
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years