• Предмет: Информатика
  • Автор: TimurKutkuzhin
  • Вопрос задан 11 месяцев назад

Срочно!!! напишите программу на языке Паскаль
Условие:
Напишите программу которая вводит с клавиатуры трехзначное число и выводит ответ"да",если среди его цифр нет одинаковых


BobbyFresnel: begin
if ReadInteger.ToString.Distinct.Count = 3 then
Print('да')
else
Print('нет')
end.
BobbyFresnel: Это на PascalABC.NET
BobbyFresnel: Мусорные ответы убрали, можно туда переписать теперь

Ответы

Ответ дал: BobbyFresnel
0

// PascalABC.NET

begin

   if ReadInteger.ToString.Distinct.Count = 3 then

     Print('да')

   else

     Print('нет')

end.

Вас заинтересует