1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

Pascal Problem

Discussion in 'Programmieren' started by [Zeus], Aug 23, 2005.

Thread Status:
Not open for further replies.
  1. [Zeus]

    [Zeus] ROM

    Ich lese gerade ein pascal tutorial und habe dieses beispiel in turbo pascal 7.0 abgetipp:

    PROGRAM Kreisberechnung;
    USES Crt;
    CONST Pi = 3.141592654;
    VAR Ergebnis, Radius: Extended;
    BEGIN
    WriteLn ('Dieses Programm berechnet den Umfang eines Kreises.');
    Write ('Geben Sie den Kreisradius ein: ');
    ReadLn (Radius);
    Ergebnis := 2 * Radius * Pi;
    WriteLn ('Der Umfang des Kreises beträgt: ', Ergebnis);
    Write ('Taste drücken um zu beenden... ');
    ReadKey;
    END.

    Bei mir kommt da als Ergebnis immer irgenteine hexadezimale zahl + eine binäre raus. z.B.: 600000000000000E + 0001

    wenn ich aber die variablen ergebnis , radius und Pi als ganzzahlen deklariere z.b. als integer dann gehts nur kann ich dann bei pi nur 3 hinschreiben.

    :confused:
     
    [Zeus], Aug 23, 2005
    #1
  2. kalweit

    kalweit Hüter der Glaskugel

    write(Ergebnis:Vorkommastellen:Nachkommastellen)
     
    kalweit, Aug 23, 2005
    #2
  3. [Zeus]

    [Zeus] ROM

    Thx jetzt funktioniert es :)
     
    [Zeus], Aug 24, 2005
    #3
  4. TheD0CT0R

    TheD0CT0R Dr. h.c. Mod

    Ist das überhaupt nötig? Ich dachte TP hätte Pi bereits hinterlegt? Probiers mal mit

    Ergebnis := 2 * Radius * PI;
    oder
    Ergebnis := 2 * Radius * PI();

    ohne PI vorher zu deklarieren.
     
    TheD0CT0R, Aug 24, 2005
    #4
  5. [Zeus]

    [Zeus] ROM

    Nein, deklarieren muss mans schon
     
    [Zeus], Aug 25, 2005
    #5
Thread Status:
Not open for further replies.

Share This Page