Názory ke článku Převody soustav v Pythonu – Programujte.com

Skvělá práce! (jen v jednom kodu je špatně odsazení)

geon píše:

Skvělá práce! (jen v jednom kodu je špatně odsazení)

Takhle bych asi řešil problém v Pascalu. Jelikož se paskal docela často učí ve škole. Zveřejním kód pro hexadecimální převod vše ostatní by už byla jen obměna.

program hexa_soustava;

uses crt;

var x,zbytek,i:longint;

    vysl,vysl12,hexa,deci:string;

    y:integer;

begin

clrscr;

window(16,4,75,23);

writeln('>>>prevod cisla do hexadecimalni soustavy<<<');

window(17,8,75,19);

repeat

read(x);y:=wherey;if x=0 then halt;

while x>0 do

      begin

      zbytek:=x mod 16;

      x:=x div 16;

      if zbytek>9 then  {then sekce pro cisla obsahujici pismena}

         begin

              case zbytek of

                   10: hexa:='A';

                   11: hexa:='B';

                   12: hexa:='C';

                   13: hexa:='D';

                   14: hexa:='E';

                   15: hexa:='F';

              end;

         vysl:=vysl+hexa;       {pricteni pismena k vysledku}

         end

         else

             begin

                  str(zbytek,deci);

                  vysl:=vysl+deci;      {pricteni ciselneho zbytku k vysledku}

             end;

end;

vysl12[0]:=vysl[0];

for i:=1 to length (vysl) do   {otoceni vysledku cislo je pozpatku}

    vysl12[i]:=vysl[length(vysl)-i+1];

gotoxy(10,y-1);

writeln('==>',vysl12:10);

vysl:='';vysl12:='';

until x <>0;

end.

Děkuju, hrozně mi tahle stránka pomohla, potřebovala jsem to do školy na písemku, ale profesor to nějak divně vysvětlil, nepochopila jsem to, až teď takže fakt moc díky!!! =o)

jak by to šlo udělat C++?

A popsano to je zde: http://python.wraith.cz/detaily-ciselne_soustavy.php
(http://python.wraith.cz/detaily-ciselne_soustavy.php)