begin
comment transform integer to string (intbase10 and intbase16);
	string (12) s;
	integer n;
	n := 123789;
	s := intbase10(n);
	write(s);
	s := intbase16(n);
	write(s);
end.