Autor Wiadomość
tehran
PostWysł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.

Powered by phpBB © 2001, 2005 phpBB Group