Ответы на вопрос:
Var prod, i, k: integer; begin prod : = 1; readln(k); for i : = k to 2 * k do prod : = prod * i; writeln(prod) end.
Популярно: Информатика
-
Tam19283746522.02.2022 10:13
-
berikkanovbekzat27.01.2020 22:16
-
klevchuk71p06srz30.08.2022 00:53
-
5831009.08.2021 04:49
-
alinka57d06.03.2021 10:13
-
2004тигр200419.06.2021 01:01
-
Annna98721.09.2021 22:48
-
тайфун7812.11.2022 02:14
-
КoТuK18.06.2023 06:54
-
cat159753jjyfvb13.06.2021 23:07