Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
bombom
2 / 2 / 1
Регистрация: 20.12.2013
Сообщений: 100
1

Перевод числа в девятиричную систему счисления

20.12.2013, 14:16. Просмотров 1064. Ответов 3
Метки нет (Все метки)

Придумайте выражение,которое с помощью mod,div,сложения,вычитания и умножения:
Переводит число от 1 до 9^4-1 в девятиричную систему счисления
на паскале
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.12.2013, 14:16
Ответы с готовыми решениями:

Перевод числа в десятичную систему счисления
Дана символьная строка, представляющая собой запись натурального числа в p-ичной системе счисления...

Перевод числа в факториальную систему счисления
перевод числа в факториальную систему счисления

Перевод числа в двоичную систему счисления.
Дано число n перевети ево в двоичную систему???? Хелп

Перевод числа из двоичной в десятичную систему счисления
for j:=0 to length(s)-1 do begin val(s,c,code); ...

Осуществить перевод числа в систему счисления с заданным основанием q (q<17)
Задано целое число a в десятичной системе счисления. Осуществить перевод числа в систему счисления...

3
petya_prog
4 / 4 / 5
Регистрация: 26.04.2013
Сообщений: 61
21.12.2013, 15:04 2
а циклы можно использовать?
и вообще в каком виде нужно получить это число? просто на экран вывести?

Добавлено через 20 минут
Pascal
1
2
3
4
5
6
7
8
9
10
11
var n,m : integer;
a :array[0..3] of integer;
Begin
 readln(n); // десятичное число
 m:= n;
 a[0]:= m mod 9; m:= m div 9; // 1-ая с конца цифра девятеричного числа
 a[1]:= m mod 9; m:= m div 9; // 2-ая с конца цифра девятеричного числа
 a[2]:= m mod 9; m:= m div 9; // 3-ая с конца цифра девятеричного числа
 a[3]:= m mod 9; m:= m div 9; // 4-ая с конца цифра девятеричного числа
writeln(a[3],a[2],a[1],a[0]);
End.
1
bombom
2 / 2 / 1
Регистрация: 20.12.2013
Сообщений: 100
25.12.2013, 10:32  [ТС] 3
Да, нужно через циклы
0
petya_prog
4 / 4 / 5
Регистрация: 26.04.2013
Сообщений: 61
25.12.2013, 12:09 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от bombom Посмотреть сообщение
Да, нужно через циклы
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var n,m : integer;
a :array[0..3] of integer;
i,j : integer;
Begin
 readln(n); // десятичное число
 m:= n;
 
i:= 0;
while (m>0) do
begin
 a[i]:= m mod 9; m:= m div 9; 
 i:= i+1;
end;
 
for j:= i-1 downto 0 do write(a[j]);
End.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.12.2013, 12:09

Осуществить перевод числа в систему счисления с заданным основанием q
3. Задано целое число a в десятичной системе счисления. Осуществить перевод числа в систему...

Одномерные массивы.Перевод числа в шестнадцатеричную систему счисления
Дано целое число в двоичной системе счисления, т.е.последовательность цифр 0 и 1, разделенных...

Перевод числа в десятичную систему счисления (Рекурсия -> Итерация)
Всех приветствую, помогите пожалуйста переделать программу с рекурсии на любой цикл. Собственно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru