Free pascal Wochentage Programm?

... komplette Frage anzeigen

1 Antwort

program checkCase;

var

tag: char;

begin

tag:= '1';

case (tag) of

'1' : writeln('Montag' );

'2' : writeln('Dienstag');

...

end; 

end.

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von DarkGerman007
02.11.2016, 21:42

Da fehlt doch noch irgendwo readLn? Wo kommt das hin? muss ich dafür auch ne Variable definieren?

0

Was möchtest Du wissen?