Schule online - Informatik 5A LE 13
 


Schuljahr 2001/2002
Schule online

Informatik 5A Jahresplan
Informatik 4B/4C Jahrespl.
Informatik Lernen 5A
Informat. Lernen 4B/4C

Deutsch 5A
Deutsch 1A

Mathematik 4BR
Mathematik 1A

Inhaltsverzeichnis
Home
 
LE 13 Pascal
 
 
  Was macht das folgende Programm?
 
 
PROGRAM test;
VAR name,strasse,geschlecht:string;
BEGIN
writeln ('Hallo');
writeln ('Wie heißt du?')
readln (name);
writeln ('Bist du männlich oder weiblich? m/w');
readln (geschlecht);
IF geschlecht=('w')
THEN Begin
     writeln ('Hallo liebe ',name);
     END
ELSE Begin
     writeln ('Hallo lieber ',name)
     END
End.

 
Zahlen In Pascal werden alle Zahlen in Gleitkommadarstellung ausgegeben.
Beispiel: Zahl 10 wird in Pascal als 1.0000000000E+01 ausgegeben.
Um das zu vermeiden, muss man dem Programm sagen, wie es die Zahlen darstellen soll.

Beispiel: radius:6:2 bedeutet, der Radius wird mit insgesamt 6 Stellen angeschrieben, wobei es 2 Nachkommastellen gibt!

 
  Was macht das folgende Programm?
 
 
PROGRAM kreis;
CONST pi=3.1415926;
VAR radius,umfang,flaeche:real;
BEGIN
writeln ('Ich kann den Umfang und Flächeninhalt eines Kreises berechnen.');
writeln ('Bitte einen Radius!');
readln (radius);
flaeche:=sqr(radius)*pi;
umfang:=2*radius*pi;
writeln ('Die Fläche des Kreises mit Radius ',radius:6:2, ' beträgt  ',flaeche:6:2, 'Quadratzentimeter!');
writeln ('Der Umfang des Kreises mit Radius ',radius:6:2, ' beträgt ', umfang:6:2, '!');
End.

 
Übung Schreib ein Programm, das für den Benutzer Volumen (V = r_oh) und Oberfläche (O=2roh + 2r_o) eines Zylinders berechnet. Das Programm soll den Benutzer fragen, ob er das Volumen oder die Oberfläche wissen will. Dazu verwende "IF - THEN - ELSE"!
 
ÜbersichtInformatik 5A