Ответы на вопрос:
Program n1; var n,i,d1,d2,d3: integer; begin readln(n); d1: =n div 100; d3: = n mod 10; d2: =(n div 10 )mod 10; if(d1=d2) or (d2=d3) or (d1=d3) then write('да') else write('нет'); end.
Популярно: Информатика
-
Catco11103.06.2020 13:32
-
nastyalobzova103.08.2022 15:22
-
olechkapushkareva26.02.2023 06:14
-
denisseleznevdenis14.02.2020 02:45
-
Гюнтер1108.01.2021 21:52
-
shultz06106.04.2022 14:17
-
али39407.04.2021 11:57
-
илья196712.10.2021 14:55
-
andreweeoneoff25.04.2022 05:06
-
123Никита563430.07.2021 01:50