|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.10.2007, 10:48 | #1 |
Пользователь
Регистрация: 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. |
21.10.2007, 11:51 | #2 |
Павел Сергеевич
Форумчанин
Регистрация: 05.11.2006
Сообщений: 665
|
а в чем, собственно проблема? Задача наипростейшая, со степенью куда интереснее (совесть посмотреть для общего развития). Объявляем два множества. Считываем количество тестов, пока количество не равно нулю читаем строку из файла и делим ее на два числа. В каждое из множеств добавляем не встречающиеся в нем числа, а как всем известно со множестваой можно проделывать множество логических и арифметических операций (каламбурчег =). Сравниваем множества (можно и не сравнивать, а проверить размер третьего множества, полученного путем вычисления разности множеств - метод "по-нашему", через зад). Заносим результат в файл и все.
Познавая других, мы познаем себя.
С'est la vie... |
22.10.2007, 13:22 | #3 | ||
Забанен
Форумчанин Подтвердите свой е-майл
Регистрация: 01.11.2006
Сообщений: 420
|
Цитата:
Цитата:
условие нужно соблюдать или нет?
Если ничто другое не помогает, прочтите, наконец, инструкцию! Аксиома Кана
|
||
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Задачи на решение 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 |