Предмет:
ИнформатикаАвтор:
dravenfunction F(n: integer):int64 :=
n <= 1 ? 1 : 2.To(n).Aggregate(int64(1), (p, q)-> p * q);
begin
Range(1, ReadInteger('n=')).Select(t -> F(t)).Sum.Println
end.
n= 104037913Автор:
baltasarДобавить свой ответ
Предмет:
Английский языкАвтор:
edenfaulknerОтветов:
Смотреть
Предмет:
ИнформатикаАвтор:
alexandermillerОтветов:
Смотреть
Предмет:
АлгебраАвтор:
goldiekuheОтветов:
Смотреть
Предмет:
МатематикаАвтор:
claudiachavezОтветов:
Смотреть