| 
| 
 | Вопрос # 5 066/ вопрос открыт / | 
 |  Приветствую, уважаемые эксперты!Подскажите листинг программы для перевода чисел из всех систем счисления (2-ой, 8-ой, 10-ой, 16-ой) и наоборот. Заранее спасибо!
 
|  |   Вопрос задала: jamila (статус: Посетитель)Вопрос отправлен: 4 марта 2011, 18:04
 Состояние вопроса: открыт, ответов: 0.
 |  
 Мини-форум вопросаВсего сообщений: 8; последнее сообщение — 6 марта 2011, 21:52; участников в обсуждении: 3. 4 марта 2011, 18:06: Вопрос перемещён из тематического раздела Delphi » Общие вопросы по программированию в раздел Delphi » Алгоритмы, преобразования модератором Ерёмин А.А. 
|   | min@y™ (статус: Доктор наук), 4 марта 2011, 19:33 [#1]:Всё это можно написать за несколько минут. Какие трудности?
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | Мережников Андрей (статус: Абитуриент), 4 марта 2011, 22:38 [#2]: Цитата (min@y™): Какие трудности?  Трудность одна - влом писать самому(ой)
 |  
|   | min@y™ (статус: Доктор наук), 5 марта 2011, 08:16 [#3]:Есть готовые функции в модуле RxStrUtils.pas. Называются они соответственно Dec2Numb() и Numb2Dec(). Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | jamila (статус: Посетитель), 5 марта 2011, 19:12 [#4]:писать программу мне не лень. Я просто еще не умею, только учусь. Я могу перевести из десятичной в двоичную, а вот так, чтобы во все сразу и обратно я не могу, поэтому попросила помощи. Если это затруднительно, простите. |  
|   | jamila (статус: Посетитель), 5 марта 2011, 19:12 [#5]:я только начинаю изучать Delphi |  
|   | min@y™ (статус: Доктор наук), 6 марта 2011, 07:26 [#6]: Цитата (min@y™): Есть готовые функции в модуле RxStrUtils.pas. Называются они соответственно Dec2Numb() и Numb2Dec().  А что, эти функции не подошли? Почему?
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | jamila (статус: Посетитель), 6 марта 2011, 19:05 [#7]:я не знаю как их использовать(( |  
|   | min@y™ (статус: Доктор наук), 6 марта 2011, 21:52 [#8]:А сейчас? 
 function Dec2Numb(N: Longint; A, B: Byte): string;Пpеобpазует целое число N в число по основанию B, дополняя слева нулями до длины A. 
 function Numb2Dec(S: string; B: Byte): Longint;Пpеобpазует число по основанию B в стpоке S в целое десятичное. Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |