Программа паскаль напишите программу, которая определяет, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом (как, например, 221). входные данные входная строка содержит одно натуральное число. выходные данные программа должна вывести слово 'yes', если в числе есть две одинаковые цифры, стоящие рядом, и слово 'no', если такой пары цифр нет.
iskanderkhusano
3
27.06.2019 06:00
1
Другие вопросы по теме Информатика
Оля0901
18.08.2019 22:30
evgenqj2002
18.08.2019 22:40
Anna14124
16.04.2021 09:32
Nelya2612
23.06.2019 09:10
allonso
23.06.2019 09:10
ivankasranka2
19.04.2021 12:02
gelyacot
22.07.2019 17:40
aftullaeva2
22.07.2019 17:40
7fan7
22.07.2019 17:40
Популярные вопросы
- Разбор слова по составу беззвездный...
1 - Если мышь захочет проглотить верблюда, то лопнет. имеет ли их смысл значение для...
3 - Запиши выражение и вычисли их значения из числа 80 вычесть сумму чисел 9 и 7 часов...
1 - 287 плюс скобка 120 минус икс скобка равно 300...
2 - Сторона огорода квадратной формы 6 м с четверти площади огурцы а остальные помидоры...
2 - Какой вопрос подходит к слову избушке?...
3 - Найдите значение выражения 9 квадрате+19...
1 - Расцветают,щурят,мечтают,краснеет.у каких при образовании личных форм основа не...
2 - По узкой дороге ехали 2 машины одна в гору другая на гору. как они разьехались?...
2 - Сколько каст существовало в индии? скжите !...
1
s:string;
i:longint;
t:boolean;
begin
read(s);
t:=false;
for i:=1 to length(s)-1 do
if s[i]=s[i+1] then t:=true;
if t then writeln('YES') else writeln('NO');
end.