|
Вопрос # 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. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|