Readln Turbo Pascal

aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Inhaltsverzeichnis 1 Beschreibung 2 Deklaration 3 Beispiele 4 1.Beispiel 5 2.Beispiel

Beschreibung

In die als Argument gegebene Variable werden Daten des Variablentyps gelesen. Es löst ausserdem einen Zeilenvorschub aus und ist damit wie writeln eine Sonderform, in diesem Fall von read.

Deklaration

procedure readln(Argument/Variable);

Beispiele

1.Beispiel

var s:string;
 
Begin
   write('Geben Sie ihren Namen ein!');
   readln(s);(*Da Die Variable den Typ String hat, wird ein String eingelesen*)
   ClrScr;
   writeln('Sie heissen: ', s);
End.

2.Beispiel

var x,y,i:integer;

Begin.
   write('Geben Sie bitte x an:  ');
   readln(x);
   write('Geben Sie bitte y an:  ');
   readln(y);
   clrscr;
   i:=0;
   if x>y then 
            Begin  
               repeat
                  begin
                     inc(y);
                     inc(i);
                  end;
               until x=y;
              write('y war um ',i,'kleiner als x');
            End;
    if x<y then 
            Begin  
               repeat
                  begin
                     inc(x);
                     inc(i);
                  end;
               until x=y
              write('x war um ',i,'kleiner als y');  
            End;
End.

--JimWayne 23:26, 9. Feb 2006 (CET)