Ответы на вопрос:
Uses crt; var x,n,res: longint; begin clrscr; write (' vvedite chislo: '); readln (x); res: =1; for i: =1 to n dores: =res*xwrite (res); readln; end.
Популярно: Информатика
-
temirlan2019p24.02.2020 14:47
-
зайчик85102.11.2020 14:42
-
школьник62728474щ322.10.2022 02:39
-
evgeha1982108.01.2021 08:15
-
GVA20020806.07.2020 00:33
-
araydaribayaray06.07.2021 12:53
-
pinGvin02211.10.2021 00:49
-
истоиия16.11.2020 01:01
-
shesasha6624.08.2020 22:14
-
akotkina109.03.2023 22:07