Выбери допустимые имена файлов. *system\.docx
system?.avi
system.avi
computer:??..docx
|system|**..docx
computer.docx
292
430
Ответы на вопрос:
Program red; var a,b,c: integer; begin b: =0; readln(a); if a< 10 then begin if a*5=0 then b: =1; end; if (a> =10) and (a< 100) then begin if ((a div 10)*5=0) then b: =1; if ((a mod 10)*5=0) then b: =1; end; if (a> =100) and (a< 1000) then begin if ((a div 100)*5=0) then b: =1; if div 10) mod 10)*5=0)then b: =1; if ((a mod 10)*5=0)then b: =1; end; if b=1 then writeln('yes') else writeln('no'); end.
Популярно: Информатика
-
Eugeniatochko01.01.2021 10:32
-
buh58312.08.2020 09:54
-
nikasuper0911.02.2020 14:31
-
daniilsemkin0505.07.2020 00:24
-
оорог04.09.2020 10:45
-
daniilraubuhin11.06.2020 17:31
-
Kate27love05.10.2022 20:47
-
frostywhite04.04.2020 01:10
-
Xalk2217.11.2020 01:03
-
CrazyMashin16.02.2020 01:04