program
var a : char;
var b : int;
var c : char;
begin
	a = 'a';
	b = ord( a ) + 1;
	c = chr( b );
	print( 
		"a = " + a + "\n" +
		"b = " + b + "\n" +
		"c = " + c + "\n" );
end.
