Ответы на вопрос:
№95 var x,y,a,b: integer; begin cls; a: =4; b: =10; x: =4; y: =10; if (a=x)and(b=y) then begin write(1); end else if (b=x)and(a=y) then begin write(1); end else write(0); end.//0 - не равны; 1- равны
Популярно: Информатика
-
Juliana241402.04.2021 21:28
-
krashakova04.02.2022 11:46
-
Девочка13414.12.2020 06:44
-
Эрайз09.03.2022 00:57
-
ikasatkina200804.02.2023 13:12
-
Maer1221.06.2021 14:26
-
гость6666604.03.2023 14:22
-
Dazzel0929.04.2020 23:47
-
dddashaaa127.03.2022 01:03
-
жсдрю31.03.2021 08:14