системы счисления в паскале

[narco3]

вводится 20-ти разрядное число с клавиатуры.необходимо перевести его в 2-ю,8-ю,16-ю. без масивов но со строками можно.пробовал не получилось...
Если кто захочет подскажите как это сделать(процедуры еще не изучали)

[Sna1L]

оффтоп.а просто переводить в другую систему счисления Вы умеете?

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

что-то вроде этого:

while(n>1) do
  begin
  if(n mod 2=1) then otv:='1'+otv//otv -строка
                     else otv:='0'+otv;
  n:=n div 2;
  end;
otv:='1'+otv;

[Serge_Bliznykov]

Sna1L, по сути Вы абсолютно правы.

Но надо только учесть, что в Паскаль нет типов данных, позволяющих оперировать 20-значными числами. Поэтому деление на 2 прийдётся реализовать "вручную" - (алгоритм деления в столбик - 2й/3й класс начальной школы).

Но есть один бонус в данной задаче.
После перевода числа в двоичную систему, перевод в 8-ю и 16-ю будет прост, как топор:
если из двоичного числа брать справа по четыре разряда и переводить их в числа от 0 до F - получим число в 16-ной СС,
если из двоичного числа брать справа по три разряда и переводить в числа от 0 до 7 - получится запись числа в 8-ной системе счисления.

[Sna1L]

Serge_Bliznykov, Вы правы, не подумал (я решил, что 20-ти разрядное - это состоящее из 20бит )
но в принципе это тонкости и особых проблем вызывать не должны, так что ТС стоило подумать над решением самому.ИМХО