tehran
Dołączył: 03 Lut 2008
Posty: 14
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
Wysłany: Śro 10:05, 06 Lut 2008 Temat postu: Readkey |
|
|
program readkey;
uses crt;
Var
znak:char;
begin
writeln( 'Wcisnij jakis klawisz...');
znak:=readkey;
Writeln( 'Wcisniety zostal klawisz: ',znak );
End.
Program czeka az wcisnie sie jakikolwiek klawisz i wyswietla go.
Post został pochwalony 0 razy
Ostatnio zmieniony przez tehran dnia Śro 20:29, 06 Lut 2008, w całości zmieniany 1 raz
|
|