program showMeCode; var symbol: char; begin while symbol <> ' ' do begin readln(symbol); writeln(symbol, ': ', Ord(symbol)); end; end.