| Типы программирования, программирование, языки программирования, книги программирование | На сайте представлена информация про программирование в Интернете и работу |
|
решите задачу Графы в Паскале задача на Паскале Проверка своих сил, Задача 2 Помогите с програмой. Помогите по Паскалю...Плз, СРОЧНО arctg, "встроенная функция" Шифрование, как расшифровать EComponentError Цвет ЛЮДИ ПОМОГИТЕ С ЗАДАЧЕЙ!!!, задача на паскале Решение квадратного уравнения Помогите решить задачи, Массив Паскаль из десятичной в двоичную Cетевое программирование на Pascal Пацкаль работа с сетью программирование на paskal, решить задачу FAQ по Pascal, где взять? Паскаль, нахождение остатка от деления Как Вы относитесь к курящим девушкам? Определение изменений. CreateOleObject, Ошибка... D2005 Architect Edition (не триал), Глюк с файлом модуля под Win32. Компоненты для Telnet? Как сделать так чтоб файл в нет отправить??? Установка Delphi 8.0?, Почему не устанавливается Delphi 8.0? отладка в Delphi.Net if (Delphi .net) then Canvas := false ???, В .net на форме уже не порисуешь? Разве...., Помогите.... Delphi - 8. Первые впечатления., Шаг вперёд - 2 шага назад MDA-приложения на основе ECO, Кто-нить юзал уже? По базам данных, Database Desktop Переносимость VCL.NET приложений Delphi 2005 проблема с компилятором .Net in Delphi7 Работа с IP-адресом, Как его сделать невидимым? нужен материал, AdoNet, Dot.net кидаю на форму кнопку(например)-ошибка Как Вы относитесь к курящим девушкам? Kylix не хочет устанавливаться (Ошибка - 10), Что делать? ./Project1: relocation error: ./Project1: undefine, undefined symbol: initPAnsiStrings Программа на Kylix не запускается без IDE, Что делать? Как окрасить меню в синий цвет? Ресурсы по Kylix CrossKylix, Kylix Crosscompiler for Delphi/Windows Удалено узнать параметры системы, Удалено узнать параметры системы Kylix зависает при компилировании Запуск внешних приложений, Запуск внешних приложений Kylix in FreeBSD, Возможно ли это? при запуске выдает undefined symbol: initPAnsiStri, Kylix 3 -- Mandrake 10.0 Power Pack + Kylix зависает при компилировании Выходит всем нравятся кривые шрифты в Kylix?, :) kylix под root'ом, объясните Таблица Kylix3 Open, жуткие тормоза бр-р-р :) Kylix3 Open, просит регистрации Libqt для Kylix с поддержкой сглаживания, кому мож надо :) Прочитать Symbolic link Kylix и Mandrake, Установка проблема со шрифтами Сколько стоит лицензионный Kylix? Проверка CrossKylix, Рабтает ли бинарник? Графики на Kylix, Замена TChart Про Куликс и его совместимость :) win api desktop backspace в консолном приложении Что использовать вместо NMURL в Kylix C++? Kylix ХОЧУ!!!!!!!!!!!!, Проблемы с установкой Kylix. Запуск bin'ov без IDE Как в Kylix воспроизвести AVI? |
Платные хостинги Раскрутка сайта Книги по программированию ЛЮДИ ПОМОГИТЕ С ЗАДАЧЕЙ!!!, задача на паскале
- Можно решать в лоб.Буквы принимают значение от 0 до 9 => берем и просто делаем различные сочетания значений букв... Добавлено @ 21:21 завтра-послезавтра предложу решение... - 39916800 - итераций - не очень долго Если простым перебором подайдет, то выложу решение с небольшой оптимизацией - ~FoX~Ну, во-первых, итераций не более 10! / (10-7)! = 604800. На самом деле меньше - заведомо Х и Г не ноль, причем хотя бы одно - 4 или больше, Р - 1, 4, 5, 6 или 9.Проще решать разложением РРРРРРРРРРР на 2 множителя. ИМХО. - Интересно, как это у тебя получилось? Да, еще вопрос, в какой системе счисления?Если десятичная система, то уже понятно, чтоТ<>0, 1, 5, 6 Это сообщение отредактировал Alex101 - 28.10.2004, 13:06 - Значительно меньше... Вот к примеру: решение 'влоб'... и уже на 51 интерации получен первое решение!C учетом подинтераций, сумарное их количество не будет больше 1000...2000 Решение 'влоб'... Цитата Начальные условия: ХРУСТ*ГРОХОТ=РРРРРРРРРРР x=[0..9] Xi<>Xj => P<>0 (Г<>0) => T<>0Решение:1)Интерация;P=[2..9],т.к Xi<>Xj и P<>02)Итерация;T*T=(1,4,9,16,25,36,49,64,81) и Xi<>Xj => Т=(2,3,4,7,8,9) и P=(4,9,6,9,4,1);3)Интерация: T=2;P=4; и Xi<>Xj => CT*OT=(xx44) => C or O = (0,7)or(1,6)or(3,9)or(5,7)or(8,9)4)Интерация: T=3;P=9; и Xi<>Xj => CT*OT=(xx99) => C or O = (1,2)or(5,8)or(6,7)5)Интерация: T=2;P=4;C or O = (0,7); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решений нет6)Интерация: T=2;P=4;C or O = (1,6); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решений нет7)Интерация: T=2;P=4;C or O = (3,9); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решений нет8)Интерация: T=2;P=4;C or O = (5,7); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решений нет9)Интерация: T=2;P=4;C or O = (8,9); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решений нет10)Интерация: T=3;P=9;C or O = (1,2); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (4,5)11)Интерация: T=3;P=9;C or O = (5,8); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (0,2)12)Интерация: T=3;P=9;C or O = (6,7); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (0,8)Промежуточные итоги:T=3; P=9; C or 0 = (1,2) => Y or X = (4,5) => Г=[6..8]C or 0 = (5,8) => Y or X = (0,2) => Г=[1,4,6,7]C or 0 = (6,7) => Y or X = (0,8) => Г=[1,2,4,5]=> Интервалы все определены... можем продолжить так: (Для всех T=3;P=9) ХРУСТ*ГРОХОТ=РРРРРРРРРРРПроверка на Max:13)Интерация: C or 0 = (1,2) => 59413*892523=53027468999 => Решений нет14)Интерация: C or 0 = (5,8) => 29053*798283=23192515999 => Решений нет15)Интерация: C or 0 = (6,7) => 89063*597873=53248362999 => Решений нетПродолжаем поиск:16)Интерация: T=4;P=6; и Xi<>Xj => CT*OT=(xx66) => Решение нет17)Интерация: T=7;P=9; и Xi<>Xj => CT*OT=(xx99) => C or O = (0,5)or(1,4)or(2,3)18)Интерация: T=8;P=4; и Xi<>Xj => CT*OT=(xx44) => C or O = (0,1)or(0,6)or(2,9)or(5,1)or(5,6)or(7,9)19)Интерация: T=9;P=1; и Xi<>Xj => CT*OT=(xx11) => C or O = (0,7)or(2,5)or(3,4)20)Интерация: T=7;P=9;C or O = (0,5); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (2,6)21)Интерация: T=7;P=9;C or O = (1,4); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (0,6)22)Интерация: T=7;P=9;C or O = (2,3); и Xi<>Xj и T=T => УСТ*ХОТ=(xx999) => Y or X = (4,6)Промежуточные итоги:T=7; P=9; C or 0 = (0,5) => Y or X = (2,6) => Г=[1,3,4,8]C or 0 = (1,4) => Y or X = (0,6) => Г=[2,3,5,8]C or 0 = (2,3) => Y or X = (4,6) => Г=[1,5,8]=> Интервалы все определены... можем продолжить так: (Для всех T=7;P=9) ХРУСТ*ГРОХОТ=РРРРРРРРРРРПроверка на Max:23)Интерация: C or 0 = (0,5) => 69207*895657=61985733999 => Решений нет24)Интерация: C or 0 = (1,4) => 69017*894647=61745851999 => Решений нет25)Интерация: C or 0 = (2,3) => 69427*893637=62042535999 => Решений нетПродолжаем поиск:26)Интерация: T=8;P=4;C or O = (0,1); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решение нет27)Интерация: T=8;P=4;C or O = (0,6); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решение нет28)Интерация: T=8;P=4;C or O = (2,9); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решение нет29)Интерация: T=8;P=4;C or O = (5,1); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Y or X = (0,3)or(2,6)or(6,7)30)Интерация: T=8;P=4;C or O = (5,6); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Решение нет31)Интерация: T=8;P=4;C or O = (7,9); и Xi<>Xj и T=T => УСТ*ХОТ=(xx444) => Y or X = (0,1)or(0,6)or(1,5)or(5,6)Промежуточные итоги:T=8; P=4; C or 0 = (5,1) => Y or X = (0,3) => Г=[2,6,7]C or 0 = (5,1) => Y or X = (2,6) => Г=[3,7,9]C or 0 = (5,1) => Y or X = (6,7) => Г=[2,3,9]C or 0 = (7,9) => Y or X = (0,1) => Г=[2,3,5,6]C or 0 = (7,9) => Y or X = (0,6) => Г=[1,2,3,5]C or 0 = (7,9) => Y or X = (1,5) => Г=[2,3,6]C or 0 = (7,9) => Y or X = (5,6) => Г=[1,2,3]=> Интервалы все определены... можем продолжить так: (Для всех T=8;P=4) ХРУСТ*ГРОХОТ=РРРРРРРРРРРПроверка на Max:32)Интерация: C or 0 = (5,1);Y or X = (0,3) => 34018*745358=25355588444 => Решений нет33)Интерация: C or 0 = (5,1);Y or X = (2,6) => 64218*945658=60728265444>44444444444 => Решение возможно!34)Интерация: C or 0 = (5,1);Y or X = (6,7) => 74618*945758=70570570444>44444444444 => Решение возможно!35)Интерация: C or 0 = (7,9);Y or X = (0,1) => 14078*649198=09139409444 => Решений нет36)Интерация: C or 0 = (7,9);Y or X = (0,6) => 64078*549698=35223548444 => Решений нет37)Интерация: C or 0 = (7,9);Y or X = (1,5) => 54178*549598=29776120444 => Решений нет38)Интерация: C or 0 = (7,9);Y or X = (5,6) => 64578*349698=22582797444 => Решений нетПроверка на Min:39)Интерация: C or 0 = (5,1);Y or X = (2,6) => 24658*341218=08413753444<44444444444 => Решение возможно!40)Интерация: C or 0 = (5,1);Y or X = (6,7) => 64758*241618=15646698444<44444444444 => Решение возможно!Продолжаем поиск:41)Интерация: T=9;P=1;C or O = (0,7); и Xi<>Xj и T=T => УСТ*ХОТ=(xx111) => Y or X = (2,4)42)Интерация: T=9;P=1;C or O = (2,5); и Xi<>Xj и T=T => УСТ*ХОТ=(xx111) => Y or X = (0,6)43)Интерация: T=9;P=1;C or O = (3,4); и Xi<>Xj и T=T => УСТ*ХОТ=(xx111) => Y or X = (0,8)or(2,6)Промежуточные итоги:T=9; P=1; C or 0 = (0,7) => Y or X = (2,4) => Г=[3,5,6,8]C or 0 = (2,5) => Y or X = (0,6) => Г=[3,4,7,8]C or 0 = (3,4) => Y or X = (0,8) => Г=[2,5,6,7]C or 0 = (3,4) => Y or X = (2,6) => Г=[5,7,8]=> Интервалы все определены... можем продолжить так: (Для всех T=9;P=1) ХРУСТ*ГРОХОТ=РРРРРРРРРРРПроверка на Max:44)Интерация: C or 0 = (0,7);Y or X = (2,4) => 41209*817479=33687492111>11111111111 => Решение возможно!45)Интерация: C or 0 = (2,5);Y or X = (0,6) => 61029*815659=49778853111>11111111111 => Решение возможно!46)Интерация: C or 0 = (3,4);Y or X = (0,8) => 81039*714849=57930648111>11111111111 => Решение возможно!47)Интерация: C or 0 = (3,4);Y or X = (2,6) => 61239*814649=49888290111>11111111111 => Решение возможно!Проверка на Min:48)Интерация: C or 0 = (0,7);Y or X = (2,4) => 21479*310209=06662979111<11111111111 => Решение возможно!49)Интерация: C or 0 = (2,5);Y or X = (0,6) => 01659*312029=00517656111<11111111111 => Решение возможно!50)Интерация: C or 0 = (3,4);Y or X = (0,8) => 01849*213039=00393909111<11111111111 => Решение возможно!51)Интерация: C or 0 = (3,4);Y or X = (2,6) => 21649*513239=11111111111=11111111111 => Решение НАЙДЕННО!Проверяем остальные комбинации:T=8; P=4; C or 0 = (5,1) => Y or X = (2,6) => Г=[3,7,9]C or 0 = (5,1) => Y or X = (6,7) => Г=[2,3,9]Х4УС8*Г4ОХО8=44444444444....Проверяем остальные комбинации:T=9; P=1; C or 0 = (0,7) => Y or X = (2,4) => Г=[3,5,6,8]C or 0 = (2,5) => Y or X = (0,6) => Г=[3,4,7,8]C or 0 = (3,4) => Y or X = (0,8) => Г=[2,5,6,7]Х1УС9*Г1ОХО9=11111111111... Это сообщение отредактировал Girder - 28.10.2004, 15:45 - ГРОХОТх ХРУСТВначале перемножаюся два одинаковых числа (Т) - последняя цифра произведения, это последняя цифра результата ТхТ. Если бы Т=0,1,5,6, то результат оканчивался бы тоже на Т (0,1,5,6).Поскольку последняя цифра произведения Р (отличная от Т) =>Т<>0, 1, 5, 6 Это сообщение отредактировал Alex101 - 28.10.2004, 15:41 - 2GirderЯ все таки не совсем понимаю то как ты решил задачу, но вижу что правильно, (я все-таки студент 1го курса) хотелось бы конечено код на паскале Это сообщение отредактировал Elfin - 28.10.2004, 16:33 - Блин задачу уже скоро сдавать... - сам удивился что работает даже если нет условий что одна буква не равна другой!!! а на переменную j лучше какнть ограничитель до 9999999 поставить хотя и не обязательно,,, данный код еще раз подтверждает:"все гениальное всегда просто!"  |