10 PRINT CHR$(14);
20 PRINT"[147]    [218]YLINDEROBERFLAECHENBERECHNUNG"
30 INPUT"[210]ADIUS ";R
40 INPUT"[200]OEHE ";H
50 O=2*R*(null)*(R+H)
60 PRINT"[196]IE [207]BERFLAECHE EINES [218]YLINDERS MIT"
70 PRINT"DER [200]OEHE"H"UND DEM [210]ADIUS"R
80 PRINT"BETRAEGT"O
90 INPUT"[206]OCH EINE [194]ERECHNUNG ";A$
100 IF A$="J"THENRUN
110 END