Anonymní profil Eva – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil Eva – Programujte.comAnonymní profil Eva – Programujte.com

 

Příspěvky odeslané z IP adresy 2a00:1028:96d2:d042:8c53:a31:9c77:1fb1...–

Eva
Pascal › Součet dvou binárních čísel
5. 11. 2021   #388934

Chtěla bych to vyřešit tak, že na vstupu se zadají dva řetězce, které budou představovat dvě binární čísla. Ty řetězce budu procházet od konce. Pokud bude poslední ''znak'' (1.čísla) jedna a (2.čísla) také jedna, tak do výsledné proměnné uložím na poslední místo nulu a pamatuju si jedničku. Pak pokračuju podle pravidel, ale jde mi o to, jak to správně zapsat. 

delka:=Ord(bin1[0]); (bin1>bin2)
      for I:=5 downto 1 do begin
                                      if (bin1[delka] = 1) and (bin2[delka] = 1) then begin
                                                                                      vysledek[delka] :=0;
                                                                                      carry := 1;
                                                                                      end;

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032022 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý