Пятница, 24.01.2025
Pascal 4 All
[ · Новые сообщения · Участники · Правила форума · Поиск · RSS ]

 

  • Страница 1 из 1
  • 1
Модератор форума: Seqular, Pavel  

символьные строки
MymindismyДата: Понедельник, 16.03.2009, 15:30 | Сообщение # 1
Знакомый
Группа: Пользователи
Сообщений: 16
Репутация: 0
Замечания: 20%
Статус: Offline
Я что-то вообще торможу....помогите....помогите.....перегрузка.... help :help:

Даны две символьные строки А и В. Составить программу, проверяющую, можно ли из букв, входящих в А, составить В (буквы можно использовать не более одного раза и можно переставлять).
Например, А: ИНТЕГРАЛ; В: АГЕНТ - составить можно; В: ГРАФ -составить нельзя.

Сообщение отредактировал Mymindismy - Понедельник, 16.03.2009, 15:31
 
SeqularДата: Вторник, 17.03.2009, 14:03 | Сообщение # 2
Хранитель
Группа: Администраторы
Сообщений: 859
Репутация: 35
Статус: Offline
Ну смотри. Мы знаем 2 слова. А и Б.
Пробегаем по всем буквам слова Б.
Если первая буква Б есть в слове А, то ее оттуда вычеркиваем.
Если вторая буква Б есть в слове А, то ее вычеркиваем. И так далее.
Если в конечном итоге все буквы нашлись, то слово составить можно!
Если хотябы одной не нашлось, то выдаем сообщение и выходим.
Проверяем вхождение функцией Pos('символ','строка'). Удаляем символ функцией Delete(строка, с которого символа удаляем, количесто удаляемых символов).


Поддерживаю также проект сообщество молодых сисадминов
 
  • Страница 1 из 1
  • 1
Поиск:

Copyright MyCorp © 2025
Используются технологии uCoz
javascript:;" rel="nofollow" onclick="loginPopupForm(); return false;