1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
%%HP: T(1)A(D)F(,); « WHILE '1==1' REPEAT "TERA T 10e12" 1 DISP "GIGA G 10e9" 2 DISP "MEGA M 10e6" 3 DISP "KILO k 10e3" 4 DISP "HEKTO h 10e2" 5 DISP "DEKA da 10e1" 6 DISP "DECI d 10e-1" 6 DISP "CENTI c 10e-2" 7 DISP END »