Ребят, помогите пожалуйста срочно! Буду благодарна! Дано натуральное трехзначное число. Напишите программу, которая определяет: А) есть ли среди цифер данного числа одинаковые;
//PascalABC.NET
begin
var num := readinteger().ToString;
if(num.Length = num.Distinct.Count) then
write('Нет')
else
write('Да');
end.
