Question

В КуМире написать алгоритм : Ввести целое число и определить есть ли в его записи две одинаковые цифры стоящие рядом. Использовать циклы с условием.( Без массивов данных)

Answer 1

Ответ:

алг

нач

цел а,б

б:=0

ввод а

нц пока а > 0  

если mod (а,10) = div (mod (а,100),10) то  

б:=б+1

вывод "Да"  

выход

всё

а:=div (а,10)

кц

если б=0 то вывод "Нет" все

кон