• Предмет: Информатика
  • Автор: skvidvard00
  • Вопрос задан 2 года назад

Найти среднее арифметическое натуральных чисел, меньших 200 и кратных 7.

Ответы

Ответ дал: Omikami
0

Ответ: 101.5

Решение:

В прикрепленном файле (Python 3.8)

Приложения:

skvidvard00: для паскаля программа нужна
Omikami: в задании надо уточнять, а не в комментариях под решением
Ответ дал: LRSM
0

Ответ:

  • begin
  • (1..199).Where(x -> x mod 7 = 0).Average.Print
  • end.

или

  • var i,s,n: integer;
  • begin
  • while i+7<200 do
  • begin
  • i := i + 7;
  • s := s + i;
  • n := n + 1;
  • end;
  • write(s/n);
  • end.

Пример работы:

Приложения:
Вас заинтересует