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


Интересные вопросы
Предмет: Алгебра,
автор: ИринаАст
Предмет: Алгебра,
автор: aluadevillekrbvxx
Предмет: Русский язык,
автор: Kayushkina
Предмет: ОБЖ,
автор: BittFoll
Предмет: Геометрия,
автор: Мерюля1