Поиск по разделу «Программирование»

$ N_{10} \longrightarrow N_b $ $(1 < b < 9)$

Pas.0014. Напишите программу, которая по заданным натуральному числу $\boldsymbol {N_{10}}$ и основанию системы счисления $1 < \boldsymbol b < 9$ выводит $\boldsymbol {N_b}$ — пред­став­ле­ние числа $\boldsymbol {N_{10}}$ в $\boldsymbol b$-ричной системе счисления.
См. также CS.0018.
Решение.
program FromN10toNb;

const

    CONVERTED_N = 216;
    BASE = 6;

var

    n : integer = CONVERTED_N;
    b : integer = BASE;
    nB : string = '';

begin

    write(n, '(10) = ');
    
    while n > 0 do
    begin
        nB := (n mod b) + nB;
        n := n div b;
        
    end;
    
    write(nB, '(', b, ').');
    
end.
Консоль.
216(10) = 1000(6).
Кстати, это не имеет отношения к данной задаче, но все же запомните занимательный арифметический факт \[
216 = 6^3 = 3^3 + 4^3 +5^3 .\]
Ярлыки: ,