Переведите число 321 из десятичной системы счисления в семеричную систему счисления

это правильно, точно?

можно легко проверить: 636(7) = 6*7^2+3*7^1+6*7^0 (10) = 294 + 21 + 6 (10) = 321(10)

спасибо большое за ответ ))

Const  Rn : String[36] = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ';Function DecToN(a : Longint; Raz : Byte) : String;Begin  If a>Raz-1 then DecToN:=DecToN(a div Raz,Raz)+Rn[(a mod Raz)+1]  else DecToN:=Rn[a+1];end;Begin  Writeln(DecToN(321,7)); { 636 }end.