Вводится трёхзначное целое положительное число . определить , есть ли среди его цыфра 0
220
283
Ответы на вопрос:
Var a,b1,b2,b3: integer; begin writeln('введи трёхзначное число'); readln(a); b1: =a mod 10; b2: =(a mod 100)div 10; b3: =a div 100; if (b1=0) or (b2=0) or (b3=0) then writeln('среди цифр есть 0') else writeln('среди цифр нет 0'); end.
Поднялся значит приблизился к жесткому диску, следовательно когда опустился он отдаляется от него, самый грубый пример. так и не понял название первичного каталога. дай полный путь тогда аи ответ полный , а пока так .
Популярно: Информатика
-
rom4ik22723224514.06.2022 04:02
-
baburinyaroslav02.07.2021 11:22
-
адинаа117.03.2023 07:29
-
keckush29.01.2023 02:56
-
20181229.12.2022 23:53
-
0Али200527.01.2023 07:59
-
BlackStar1406.07.2022 05:56
-
anna08020317.04.2023 13:55
-
klymukmaks19.09.2022 18:00
-
кура00023.06.2021 23:18