5 'Анализ символов, вводимых с клавиатуры
10 ON ASC(INPUT$(1))-26 GOTO 101,102,103
101 GOTO 10
102 PRINT "Нажата клавиша 
W
W▐":END
103 PRINT "Нажата клавиша ░
W
W":END