program mgod;
var a: Char;

begin
	while not eof do
	begin
		Read(a);
		Write(Ord(a));
		Write(' ');
	end;
end.
