Вопрос 1Cоставить программу определения кодов нажатых клавиш. Выход из программы-"пробел" составить програм

[lex123]

1Cоставить программу определения кодов нажатых клавиш. Выход из программы-"пробел" составить программу на Паскале

 

[viktor1986a]

var c:char; begin repeat readln(c); if c= then break; writeln(ord(c)) until false end. удлинитель ответа

 

[TheDanil]

типа того использовать модуль ЦРТ; переменная С типа Символ; начало С := СчитатьСимвол; если Число (С) =Число (" ") то выйти иначе НаписатьСНовойСтроки (Число (С)); end.