Консультация № 129016
25.03.2008, 16:30
0.00 руб.
0 1 1
Здравствуйте уважаемые эксперты.

Помогите пожалуйста в решении вопроса № 129014

Задачка на системы счисления:
даны два натуральных числа D и N (2<=n<=16)
Организовать перевод целого десятичного числа D в N-ичную систему счисления.
Решение неоюходимо на Basic или Pascal
Заранее благодарю.<p><fieldset style=‘background-color:#EFEFEF; width:80%; border:1px solid; padding:10px;‘ class=fieldset><font color=#777777><i>Добавлен текст вопроса.</i>
-----
</font><font size=1 color=#777777><b>• Отредактировал: <a href=http://rusfaq.ru/info/user/24116 target=_blank>Admiral</a></b> (Профессор)
<b>• Дата редактирования:</b> 25.03.2008, 16:37</font></fieldset>

Обсуждение

давно
Старший Модератор
31795
6196
25.03.2008, 16:50
общий
это ответ
Здравствуйте, Lommm!

Программа в приложении.
вопросы по ней задавайте в мини-форум.
Удачи!

Приложение:
var d,n:word; s:string; begin write(‘D:‘);readln(d); repeat write(‘N:‘);readln(n); until (n>1)and(n<17); s:=‘‘; while d>0 do begin s:=chr((d mod n)+48+7*ord((d mod n)>9))+s; d:=d div n; end; writeln(s); end.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

Форма ответа