Перевод целого числа из десятичной системы счисления в шестнадцатеричную - Pascal

  1. Нужно написать программу на Паскале. Помогите пожалуйста. И чем проще будут записи,тем лучше, я чайник в программировании.


textual

Код к задаче: «Перевод целого числа из десятичной системы счисления в шестнадцатеричную - Pascal»

uses crt;
const zn:string[16]='0123456789ABCDEF';//цифры в СС 16
var n:longint;
    s:string;
begin
clrscr;
write('Число в системе 10=');
readln(n);
s:='';
while n>0 do
 begin
  s:=zn[n mod 16+1]+s;//берем остаток от деления на 16 и эту цифру пишем в начало строки
  n:=n div 16;//сокращаем
 end;
write('      В системе 16 =',s);
readln
end.

СДЕЛАЙТЕ РЕПОСТ

13   голосов, оценка 4.154 из 5



Похожие ответы
  1. Помогите перевести 2 кода C++1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 #include #include using namespace std; int main() { double a,b,k,x,M,N; cin>>a>>b>>k>>x; if(k>0) {     M=(a*b*x/sqrt(k)+2.84);     if((x>=0)&&(exp(k*x)+0.54*a*b+pow(M,2)!=0))     {N=(0.84*a*pow(b,3)*pow(sin(x),2)+sqrt(x)/exp(k*x)+0.54*a*b+pow(M,2));     cout<<"N="< using namespace std; #include int main () {     double x,y; cin>>x; if(x<0.15) {     y=pow(sin(x),2);     cout<<"y="<0)     {         y=1+sqrt(2+pow(x,2));         cout<<"y="<

    1. Здравствуйте! помогите пожалуйста написать программу, переводящую целые числа из десятичной системы счисления в двоичную. не могу догадаться как записыватьединицы и нули. знаю, что всё время надо делить на 2. надо ли делать массив в программе? заранее благодарю.

  1. Помогите, пожалуйста, перевести код с С++ в pascal:C++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 28 #include #include   using namespace std;   int main() { int Vase[3]; for(int i = 0; i < 3; ++i) cin >> Vase[i]; for(int i = 0; i < 3; ++i) cout << setw(4) << Vase[i]; cout << endl; int count = 0; while(true) { if(!Vase[0]--) break; ++count; if(!Vase[1]--) break; ++count; if(!Vase[2]--) break; ++count; if(!Vase[1]--) break; ++count; } cout << "\nNumber: " << count << endl; return 0; }Или объясните что значит: 1) Vase[3]; 2) cin >> Vase[i]; 3) cout << setw(4) << Vase[i]; 4) cout << endl; 5) !Vase[0]-- 6) cout << "\nNumber: " << count << endl; ... и какими командами это можно заменить в паскале?

  1. Ребят, помогите, уже неделю бьюсь головой об ноут... Нам дали задачу написать прогу, которая будет переводить число из любой системы счисления в любую другую. НО подвох в том, что препод дает несуществующие системы счисления! К примеру переведите число "9_65_76" из 80 системы счисления в 51-ую систему счисления. ("_" это тип пробел) В инете нету нигде, а я не настолько шикарно пишу проги что бы написать ЭТО Прошу помогите, мне не важно даже на каком языке (С++, С, Паскаль любой) лишь бы было.

  1. помогите, пожалуйста, составить программу для перевода в десятичную систему целых чисел из прямого, обратного и дополнительного кода для 8-битной кодировки

  1. Помогите составить программу перевода из некоторой системы счисления в родственную ей систему счисления вещественных чисел, содержащих как целую, так и дробную часть: Из шестнадцатеричной системы счислению в восьмеричную

  1. Помогите, пожалуйста, составить программу с процедурой, которая переводит дробное положительное число (от 0 до 1) в систему счисления, основание которой (от 2 до 9) вводится с клавиатуры. Процесс должен прерываться, когда будет достигнута нужная точность (которая тоже вводится с клавиатуры).

  1. Дали задание: написать программу для перевода из одной системы счисления в другую. Системы счисления задаются с клавиатуры. Т.е. Программа спрашивает В какой системе будет число. Пишу "2" Программа "введите число в двоичной системе" Ввожу число. Программа спрашивает "В какую систему будем переводить?" Отвечаю"10" Ответ на экране Число N в двоичной системе = числу М в десятичной системе и так применительно к другим системам Вообще не понимаю как делать

  1. Здравствуйте, возникла проблема, не могу разобраться с преобразованием числа в обратный и дополнительный код. Если с переводом из одной сс в другую все более-менее ясно, то здесь я явно что-то напортачила Заранее благодарю за отзывы и помощь Задание: Исходный файл содержит числа в шестнадцатеричной системе счисления, отделенные друг от друга запятыми. Составить программу, которая для каждого такого числа из заданного диапазона после знака равенства указывает его значение в семеричной системе, в виде дополнительного кода или в виде обратного кода по выбору пользователя. Исходный код: