Question

Дано трехзначное число. Напишите программу, которая определяет: есть ли среди цифр заданного целого трехзначного числа одинаковые;

Answer 1

num = input()

print('Да' if len(set(num)) != len(num) else 'Нет')

Answer 2

Ответ:

program z1;

var a: integer;

begin

write('Введите трёхзначное число а = ');

readln(a);

if (a div 100 = a mod 10) or (a div 100 = a div 10 mod 10) or (a mod 10 = a div 10 mod 10) then writeln ('Да')

else writeln ('Нет')

end.