Почему я не могу отвечать на этом сайте? я сто раз пытался ответь, не чего не получается!
на в этом сайте на пк.
!
213
362
Ответы на вопрос:
Var a,p : integer; begin p : = 1; read(a); repeat p: = p*a; read(a) until (a < -10) or (a > 10); write(p); end.
Популярно: Информатика
-
vyachik200004.05.2023 12:18
-
elenafink6910.12.2021 00:56
-
hikita0706.05.2020 10:47
-
Oufaa26.02.2020 04:44
-
BOLYUBASH133705.02.2021 10:22
-
SanyaZv09.03.2022 18:41
-
аааааааа3620.05.2020 01:14
-
nAsTyAsUpErYeS19.04.2021 22:11
-
Polina21100418.02.2020 23:01
-
Elyzaveta200415.01.2023 12:54