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

bogdanovga73p06s3m bogdanovga73p06s3m    2   13.12.2019 17:04    0

Ответы
котан6 котан6  11.08.2020 21:28

===== PascalABC.NET =====

begin

 var h := HSet(Range(0,9));

 var n := Abs(ReadInteger('Введите целое число:'));

 while n > 0 do

 begin

   h.Remove(n mod 10);

   n := n div 10

 end;

 h.Println

end.


Напечатать в возрастающем порядке все цифры, не входящие в запись данного натурального числа решить
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика