Предмет: Информатика,
автор: mashataranova0701
Создайте проект для вычисления среднего арифметического положи- тельных чисел, первое из которых равно 100, а каждое следующее меньше предыдущего на заданное положительное число.
Ответы
Автор ответа:
5
PascalABC.NET
Ответ:
- begin
- var n := ReadInteger;
- SeqWhile(100, x->x-n, x->x>0).Average.Print
- end.
Пример работы:
Приложения:


Похожие вопросы
Предмет: История,
автор: SABINAаси
Предмет: Русский язык,
автор: aida2499
Предмет: История,
автор: Энциклопеди
Предмет: Алгебра,
автор: toyota825
Предмет: Математика,
автор: Sati26