Deutsches Lazarusforum

Hallo h-elsner,

ich werde das Programm am nächsten Wochenende kommentieren. Dann werde ich auch die Langzahlarithmetik fertig machen. Da fehlen noch div und mod. Im Moment konzentriere ich mich auf den Einstieg in die Ausbildung und habe meine privaten Projekte beiseitegelegt. Sorry.

Neuling

Hallo

Danke für die Antworten. Ich werde darüber nachdenken. Ich habe jetzt auch das zweibändige Lehrbuch von Wilfried Koch. Damit muss ich nicht mehr im Nebel stochern und zeitraubend experimentieren.

Neuling

Eventuell muss ich mich - was die Funktionalität für große Zahlen angeht - korrigieren. Ich habe wohl einen Fehler beim Aufsummieren in Bezug auf den Übertrag gemacht, der sich bei großen Zahlen zeigen würde. Vielleicht. Ich bin zu müde, um noch darüber nachzudenken. Wann anders.

Multiplikation läuft.

program Multi;

uses Crt,Dos,SysUtils;

var
zahl_1,zahl_2,ergebnis : String;
abbruch : String[1];

function Gleich(Zah_1,Zah_2: String): Boolean;

var
i : Integer;
ziff_zah_1,ziff_zah_2 : String[1];

begin
if Length(zah_1) < Length(zah_2) then exit(false);
if Length ...

Danke für den Tipp. Brüte gerade über Arrays.

So läuft es. Geht wohl auch kürzer.

program Lang_Add_Sub;

uses
Crt,Dos,SysUtils;

var
zahl_1,zahl_2,ergebnis,abbruch,a : String;

function Subtraktion(zah_1,zah_2: String): String; forward;

function Gleich(Zah_1,Zah_2: String): Boolean;

var
i : Integer;
ziff_zah_1,ziff_zah_2 : String[1 ...

Das werde ich. Am Wochenende. Für mich hat die Umschulung zum Fachinformatiker begonnen. Daher habe ich wenig Zeit.

Danke Siro! Wieder etwas gelernt. Ich mache einen Tag Pause. Mit übermüdetem Kopf neige ich zu dummen Fehlern. Wie z. B. den Fehler in den Funktionen Kleiner und Goesser.

Jetzt werde ich mich erstmal mit Arrays beschäftigen, bevor ich mit der Multiplikation anfange. Die nächste Nuss zu knacken.

Danke für die Antwort. Subtraktion bekommt ja das Ergebnis zurück. Manchmal sieht man den Wald vor lauter Bäumen nicht. Dann mache ich mich mal an die Multiplikation ran. Nochmals ein erleichtertes Danke.

Danke für die Antwort. Das Problem habe ich oben beschrieben. Ich verwende tatsächlich bei diesen Funktionen eine globale Variable. Ein Bsp. für mein Problem. Die Funktion Subtraktion bekommt die Werte -5 und 5 übergeben. Also ist die Rechnung -5 - 5. Das ist aber -(5 + 5). Also eine Aufgabe für die ...

Hallo

Ich habe die Fehler behoben. Solange keine führenden Nullen eingegeben werden läuft das Programm für Addition und Subtraktion von positiven und negativen Ganzzahlen. Da ich, sobald ich *, div und mod fertig habe, eine Unit machen werde, ist das bedeutungslos. Ich werde eine sicher Eingabe für ...

Danke. Aber genau so habe ich es in den Funktionen <,=,> implementiert. Den Fehler habe ich schon korrigiert. Trotzdem Danke.

Jetzt muss ich nur noch den Rest "rückanpassen". Schluss für heute.

Ich habe die Funktion Kleiner korrigiert. Nun sollte es stimmen. Vielleicht entdeckt aber auch jemand einen Denkfehler. Ich sehe im Moment den Wald vor lauter Bäumen nicht.

function Kleiner(Zah_1,Zah_2: String): Boolean;

var
ziff_1_str,ziff_2_str : String;
i,j,ziff_1_int,ziff_2_int : Integer ...