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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 15.05.2010, 04:19   #1
DRGNforce
Пользователь
 
Регистрация: 27.02.2010
Сообщений: 18
По умолчанию Pascal stroki_2

Дана строка. Подсчитать, сколько различных символов всречаются в ней.
DRGNforce вне форума Ответить с цитированием
Старый 15.05.2010, 07:42   #2
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,830
По умолчанию

Код:
Счетчик = 0;
множество = [];
Идти по строке:
  если буква не в множестве:
    добавить в множество
    увеличитьсчетчик
как-то так можно
p51x вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Turbo Pascal or Pascal ABC Ikram Паскаль, Turbo Pascal, PascalABC.NET 0 27.04.2010 13:44
Pascal Defender42 Помощь студентам 1 17.03.2010 06:22
а free pascal не читает задачи которые написаны на turbo pascal? demonara Паскаль, Turbo Pascal, PascalABC.NET 3 25.05.2009 16:28
Перевод кода из Pascal в Object Pascal zemskov77 Общие вопросы Delphi 1 03.01.2009 09:37