Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.06.2011, 21:17   #1
Aimet
Пользователь
 
Регистрация: 16.06.2011
Сообщений: 22
По умолчанию напечатать в возрастающем порядке все цифры, не входящие в запись данного натурального числа

напечатать в возрастающем порядке все цифры, не входящие в запись данного натурального числа
Программу нужно выполнить на языке PascalABC.
Aimet вне форума Ответить с цитированием
Старый 18.06.2011, 19:57   #2
rubius2008
Форумчанин
 
Регистрация: 19.03.2010
Сообщений: 409
По умолчанию

Код:
str(n,s);
for z:='0' to '9' do if pos(z,s)=0 then write(z,' ');
Есть вопросы, пишите в ЛС.
rubius2008 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
напечатать в убывающем порядке все цифры Aimet Паскаль, Turbo Pascal, PascalABC.NET 0 16.06.2011 21:13
Вывести все буквы данного текстового файла, входящие в файл не менее двух раз. swillrocker Помощь студентам 0 10.06.2011 17:16
Множества. Вывести в алфавитном порядке все буква текста, входящие в него более двух раз ilyas22 Паскаль, Turbo Pascal, PascalABC.NET 5 23.05.2010 12:50
Распечатать все буквы входящие в текст не мене двух раз в алфавитном порядке. Паскаль. DIzza Помощь студентам 5 13.03.2009 09:08
Найти количество различных цифр данного натурального числа. stalker Паскаль, Turbo Pascal, PascalABC.NET 10 22.05.2007 17:45