Предмет: Информатика, автор: mashataranova0701

Создайте проект для вычисления среднего арифметического положи- тельных чисел, первое из которых равно 100, а каждое следующее меньше предыдущего на заданное положительное число.

Ответы

Автор ответа: LRSM
5

PascalABC.NET

Ответ:

  • begin
  • var n := ReadInteger;
  • SeqWhile(100, x->x-n, x->x>0).Average.Print
  • end.

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

Приложения:
Похожие вопросы