using System;

public class Program

{

    const ulong MaxUint = (ulong) uint.MaxValue;

    const int BitShift = 32;

    public static void Main()

    {

        GetRA(01);

        GetRA(13);

        GetRA(MaxUint);

        GetRA(MaxUint+2);

        Console.WriteLine("---------");

        for(ulong i=0;i<5;i++)

            GetRA((MaxUint+1)*i+1);

    }

    static void GetRA(ulong codigo){

        var index = codigo-1;

        ulong codemask = MaxUint;

        ulong ordermask = MaxUint << BitShift;

        var code = index & codemask;

        var orderIncrement = (index & ordermask) >> BitShift;

        var order = (char)(((byte)'A')+orderIncrement);

        var ret = $"R{order}-{code.ToString("X8")}";

        Console.WriteLine($"{codigo.ToString("D16")}: {ret}");

    }

}