Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
Angel_09
0 / 0 / 1
Регистрация: 15.08.2016
Сообщений: 47
1

Программа для перевода из 10, 3 и 16, ричных систем в 4-ричную систему счисления

04.07.2018, 14:19. Просмотров 837. Ответов 2
Метки нет (Все метки)

Всем привет, вот сижу в поиске такой программы, если бы сроки не поджимали я был нашел, но увы спешка не дает мне все внимательно просмотреть, или переделать то что имею.
Ближе к делу, мне поручили составить программу которая сможет перевести 11210, 1001112 и 1B16 в 4-ричную систему счисления.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.07.2018, 14:19
Ответы с готовыми решениями:

Программа для перевода из 3 в 16 систему счисления
Напишите, пожалуйста, простую программу в паскале abc, которая переводит из 3 в 16 систему...

Рекурсия. Составить программу для перевода числа в Р-ичную систему счисления (2 <= Р <=9)...
Стставить программу для перевода данного натурального числа в р-ичную систему счисления (2&lt;=р&lt;=9)

Составить программу для перевода данного натурального числа в p-ичную систему счисления
Помогите пожалуйста кто может!!! Составить программу для перевода данного натурального числа в...

Программа Перевода десятичного числа в N-ричную систему счисления
Пожалуйста, друзья, помогите написать программу с процедурой перевода десятичного числа(задается с...

Программа для перевода из десятичной сс в любую другую систему счисления
Создать программу перевода заданного числа в десятичной системе счисления в любую другую. Исходные...

2
Puporev
Модератор
58043 / 44167 / 30510
Регистрация: 18.05.2008
Сообщений: 105,751
04.07.2018, 15:29 2
Лучший ответ Сообщение было отмечено Angel_09 как решение

Решение

Программа для перевода из 10, 3 и 16, ричных систем в 4-ричную систему счисления
Цитата Сообщение от Angel_09 Посмотреть сообщение
перевести 11210, 1001112 и 1B16 в 4-ричную
Как-то не соответствует название темы сообщению.

Добавлено через 19 минут
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
const digit:string[36]='0123456789ABCDEF';
//из 10 в 2..16
function FromDec(n,p:integer):string;
var s:string;
begin
s:='';
while n>0 do
 begin
  s:=digit[n mod p+1]+s;
  n:=n div p;
 end;
fromdec:=s;
end;
//из 2..16 в 10
function ToDec(s:string;p:integer):integer;
var m,i:integer;
begin
m:=0;
for i:=1 to length(s) do
m:=m*p+pos(s[i],digit)-1;
ToDec:=m;
end;
begin
writeln('112(10)=',FromDec(112,4),'(4)');
writeln('100111(2)=',FromDec(ToDec('100111',2),4),'(4)');
writeln('B1(16)=',FromDec(ToDec('B1',16),4),'(4)')
end.
1
Angel_09
0 / 0 / 1
Регистрация: 15.08.2016
Сообщений: 47
04.07.2018, 15:51  [ТС] 3
Цитата Сообщение от Puporev Посмотреть сообщение
темы сообщению
Спасибо что подметили, вот я недатепа.

И да спасибо за помощь!!!!
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.07.2018, 15:51

Программа перевода в любую систему счисления менее 10
Прошу помочь в написании программы! Должно быть написано просто, без массива. 1. Программа...

Программа перевода десятичного числа в двоичную систему счисления с использования стека
Доброго времени суток!) У меня тут такая проблема, нужно написать программу перевода десятичного...

Написать программу для перевода из одной в другую систему счисления
написать программу для перевода из двоичной в десятеричную, из восьмеричной в шестнадцатеричную...


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

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

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