Ответы на вопрос:
Объяснение:
культурному и уважительному общению в сети интернет,без мата и ненормативной лексики
Uses crt; var x: string; i,mult,len: integer; begin mult: =1; read(x); i: =1; len: =length(x); while i< =len do begin mult: =mult*strtoint(x[i]); i: =i+1; end; if length(inttostr(mult))=2 then writeln('yes') else writeln('no'); end.
Популярно: Информатика
-
Damir234202.10.2021 03:58
-
ИришкаTV12.03.2021 08:26
-
113Diana11313.07.2021 11:10
-
Losvlosinavhlasinah09.10.2022 06:12
-
BobrovskayaVera121.04.2020 14:32
-
Dva4evsky28.04.2023 22:59
-
Licik1622.06.2022 08:45
-
дядяррррр04.02.2022 17:43
-
Markos1428.08.2020 03:57
-
Znanija9605.04.2022 19:35