Срочно!!! напишите программу на языке Паскаль Условие: Напишите программу которая вводит с клавиатуры трехзначное число и выводит ответ"да",если среди его цифр нет одинаковых
begin if ReadInteger.ToString.Distinct.Count = 3 then Print('да') else Print('нет')end.
Это на PascalABC.NET
Мусорные ответы убрали, можно туда переписать теперь
// PascalABC.NET
begin
if ReadInteger.ToString.Distinct.Count = 3 then
Print('да')
else
Print('нет')
end.