Форум программистов, компьютерный форум CyberForum.ru
CyberForum.ru - форум программистов и сисадминов > >
Восстановить пароль Регистрация

Ответ Создать новую тему
 
KIBERNETIK12
Новичок
0 / 0 / 0
Регистрация: 18.06.2010
Сообщений: 31
24.06.2010, 12:12     Перевод из десятичной системы счисления в восьмеричную
  #1
напишите алгоритм по тексту

Для перевода чисел из десятичной системы счисления в восьмеричную используют тот же "алгоритм замещения", что и при переводе из десятичной системы счисления в двоичную, только в качестве делителя используют 8, основание восьмеричной системы счисления:
Делим десятичное число А на 8. Частное Q запоминаем для следующего шага, а остаток a записываем как младший бит восьмеричного числа.
Если частное q не равно 0, принимаем его за новое делимое и повторяем процедуру, описанную в шаге 1. Каждый новый остаток записывается в разряды восьмеричного числа в направлении от младшего бита к старшему.
Алгоритм продолжается до тех пор, пока в результате выполнения шагов 1 и 2 не получится частное Q = 0 и остаток a меньше 8.
AdAgent
Объявления
24.06.2010, 12:12
Puporev
Модератор
42418 / 30932 / 1877
Регистрация: 18.05.2008
Сообщений: 65,959
24.06.2010, 12:22     Перевод из десятичной системы счисления в восьмеричную
  #2
Код Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
const zn:string[8]='01234567';
function DecToOct(n:longint):string;
var s:string;
begin
s:='';
while n>0 do
 begin
  s:=zn[n mod 8+1]+s;
  n:=n div 8;
 end;
DecToOct:=s;
end;
var d:longint;
begin
clrscr;
write('Число в системе 10=');
readln(d);
write('      В системе 8 =',DecToOct(d));
readln
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему

Похожие темы
Тема Раздел Ответов Автор Дата
Pascal Напишите программу перевода числа из десятичной системы счисления в восьмеричную
4. Напишите программу перевода числа из десятичной системы счисления в восьмеричную.
Pascal (Паскаль) 1 kaiz 09.04.2014 15:35
Pascal Написать рекурсивную процедуру перевода натурального числа из десятичной системы счисления в восьмеричную
В Паскале.
Pascal (Паскаль) 1 Arion_ater 03.12.2013 05:29
Pascal ABC Перевод натурального числа из десятичной системы счисления в восьмеричную
\Написать рекурсивную процедуру перевода натурального числа из десятичной системы счисления в восьмеричную
Pascal ABC 2 sparta3131 27.12.2012 17:44
Pascal ABC Написать рекурсивную процедуру, переводящую целое число из десятичной системы счисления в восьмеричную.
Написать рекурсивную процедуру, переводящую целое число из десятичной системы счисления в восьмеричную.
Pascal ABC 3 федос 07.03.2012 15:42
Turbo Pascal Написать рекурсивную процедуру, переводящую целое число из десятичной системы счисления в восьмеричную.
.Написать рекурсивную процедуру, переводящую целое число из десятичной системы счисления в восьмеричную.
Turbo Pascal 2 федос 07.03.2012 15:26
Pascal перевод систем счисления из десятичной в восьмеричную и обратно в Pascal !
Помогите написать программу : - " перевод систем счисления из десятичной в восьмеричную и обратно" ! Плиз.
Pascal (Паскаль) 4 Natal'ya 22.10.2010 19:14
Free Pascal Перевод из Десятичной системы в восьмеричную
Здравствуйте, прошу прощения но мне срочно нужна помощь. Мне задали задачу а завтра сдавать а я вообще ничего не знаю..... Помогите пожалуйста..... Дано вещественное число в десятичной системе...
Free Pascal 20 farmay 17.06.2010 22:50
Pascal Перевод числа с десятичной системы в восьмеричную систему
Составить программу, которая переводит число А с десятичной системы исчесления в восмиричную, используя метод деления в столбик. Промежуточные и итоговые результаты перевода отобразить на экране....
Pascal (Паскаль) 5 Yarikdik 21.01.2010 10:19
Опции темы

Текущее время: 13:47. Часовой пояс GMT +4.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.