Ответы на вопрос:
Var x,y: real; begin writeln ('введите координаты точки (x,y)'); readln (x,y); if (x=0) and (y=0) then writeln ('0') else if (x=0) or (y=0) then writeln ('1') else writeln ('2'); end.
Популярно: Информатика
-
sterling115.06.2021 18:24
-
maliarciuk53305.10.2020 08:45
-
mariapogorelova11.05.2022 04:46
-
makssabarov23.09.2022 16:37
-
vinnnner02.12.2020 02:31
-
Fynerka03.04.2020 17:10
-
K1rysha23.08.2022 08:00
-
Лубаша03.07.2021 15:31
-
sadovinaviktoriay12.07.2020 19:21
-
Mirano200425.12.2021 03:24