Wert von Variablen tauschen / Pascal

Dieses Thema im Forum "Informatik" wurde erstellt von orcams, 23 Feb. 2007.

  1. Hallo,

    ich komme bei der folgenden Aufgabe nicht so richtig weiter, vielleicht kann mir ja jemand einen Tipp geben.

    "Schreiben Sie ein Programm, das zwei reele Zahlen a und b austauscht, wenn a größer ist als b."


    Nachfolgend mein Versuch (ich hoffe, ich bin auf dem richtigen Weg...):
    (kann man das mit dem "If" überhaupt so realisieren?)

    -------------------------------------------------------------


    Program Zahlen_Austausch;

    Var a,b,h : Real;

    Begin
    readln (a);
    readln (b);

    If a > b
    Then Begin
    h := a;
    a := b;
    b := h;
    End;

    writeln ('Der Wert von a ist jetzt' a);
    writeln ('Der Wert von b ist jetzt' b);


    End.


    -----------------------------------------

    Viele Grüße,
    Marco
     
  2. AW: Wert von Variablen tauschen / Pascal

    Hallo Marco,

    das müsste so funktioieren. Sieht eigentlich ganz gut aus.
     
  3. AW: Wert von Variablen tauschen / Pascal

    Program Zahlen_Austausch;
    Var h,a,b:Byte;

    Begin
    a:= strtoint(readln ('bitte eine Zahl eingeben'));
    b:= strtoint(readln ('bitte eine Zahl eingeben'));
    If a > b
    Then Begin
    h := a;
    a := b;
    b := h;
    End;
    writeln ('Der Wert von a ist jetzt' +inttostr(b));
    writeln ('Der Wert von b ist jetzt' +inttostr(a));

    End.

    funktioniert sicher und real gibt es nicht mehr:rolleyes::p
     
  4. AW: Wert von Variablen tauschen / Pascal

    Und warum sollte es real nicht mehr geben?

    mfg bitshifter
     

Diese Seite empfehlen