Ответы на вопрос:
Var a,b,c: integer; begin writeln('a, b, c: '); readln(a,b,c); if (a=b)and(b=c) then writeln(3) else if (a=b)or(a=c)or(b=c) then writeln(2) else writeln(0); end. пример: a, b, c: 1 2 1 2
Популярно: Информатика
-
ааааааспасите19.01.2022 06:26
-
pazovamilanai19.01.2021 10:40
-
bulgatovanastya122.06.2020 22:20
-
Загадочник1209.08.2021 20:47
-
dikoshadobro119.07.2021 11:26
-
alfami200428.09.2020 06:54
-
leraloslerap00mm623.12.2021 02:24
-
Mashalove1627.08.2021 09:59
-
kubajoleksandra02.06.2020 09:23
-
Цыпленочка03.09.2020 08:33