Ответы на вопрос:
Var a,b,c,d,x: integer; begin x: =0; readln(a,b,c,d); if a=0 then inc(x); if b=0 then inc(x); if c=0 then inc(x); if d=0 then inc(x); writeln(x); end.
Популярно: Информатика
-
ahkmedchaush018.04.2020 14:37
-
7112129.10.2021 09:11
-
VikaPoluyan27.09.2021 05:07
-
Angelina11155517.03.2023 15:20
-
Znanijaetosila107.01.2023 08:22
-
Mihailevscaeanica20.06.2023 05:53
-
rumtum16.07.2022 14:11
-
djamilaalieva03.06.2022 20:26
-
Krest00704.07.2021 08:06
-
den22227630.04.2020 13:02