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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.10.2007, 10:48   #1
Progs
Пользователь
 
Регистрация: 23.04.2007
Сообщений: 17
По умолчанию Решение задачи на Pascal

Добрый день. Прошу помочь решить задачу на pascal'e.
Собственно сама задача:

Будем называть два числа дружными, если они состоят из одних и тех же цифр. Например, числа 1132 и 32321 являются дружными, а 12 и 123 – нет (в первом числе нет цифры 3). Требуется написать программу, которая определит, являются ли два заданных числа дружными.
Входные данные

Входной текстовый файл INPUT.TXT содержит в первой строке натуральное число K – количество тестов. Количество тестов не превышает 10. В следующих K строках содержатся по два целых числа A и B, разделенные одним пробелом (0 < A < 109, 0 < B < 109).
Выходные данные

Выходной текстовый файл OUTPUT.TXT должен содержать K строк. Для каждого теста в отдельной строке надо выдать сообщение “YES”, если A и B являются дружными, или “NO”, если не являются. В сообщениях кавычки не печатать.
Примеры

INPUT.TXT
1
1132 32321

OUTPUT.TXT
YES

Заранее спасибо.
Read This F**ckin' Manual - прочти руководство, прежде чем доставать нас ©Hammer

Последний раз редактировалось Progs; 21.10.2007 в 11:00.
Progs вне форума Ответить с цитированием
Старый 21.10.2007, 11:51   #2
SuperVisor
Павел Сергеевич
Форумчанин
 
Регистрация: 05.11.2006
Сообщений: 665
По умолчанию

а в чем, собственно проблема? Задача наипростейшая, со степенью куда интереснее (совесть посмотреть для общего развития). Объявляем два множества. Считываем количество тестов, пока количество не равно нулю читаем строку из файла и делим ее на два числа. В каждое из множеств добавляем не встречающиеся в нем числа, а как всем известно со множестваой можно проделывать множество логических и арифметических операций (каламбурчег =). Сравниваем множества (можно и не сравнивать, а проверить размер третьего множества, полученного путем вычисления разности множеств - метод "по-нашему", через зад). Заносим результат в файл и все.
Познавая других, мы познаем себя.
С'est la vie...
SuperVisor вне форума Ответить с цитированием
Старый 22.10.2007, 13:22   #3
Plague
Забанен
Форумчанин Подтвердите свой е-майл
 
Аватар для Plague
 
Регистрация: 01.11.2006
Сообщений: 420
По умолчанию

Цитата:
два целых числа A и B, разделенные одним пробелом (0 < A < 109, 0 < B < 109)
и тут же пример
Цитата:
INPUT.TXT
1
1132 32321

OUTPUT.TXT
YES
т.е. K=1, A=1132, B=32321

условие нужно соблюдать или нет?
Если ничто другое не помогает, прочтите, наконец, инструкцию! Аксиома Кана
Plague вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задачи на решение Pascal abc Tecka Фриланс 9 18.12.2012 22:20
Решение задачи на c++ JOFRIF Помощь студентам 2 21.04.2008 00:35
Решение задачи за WMZ (PASCAL). 4meen Фриланс 5 08.12.2007 14:58
Решение задачи на Pascal Progs Помощь студентам 4 03.11.2007 15:23