begin
	comment function exp;
	real x, y;
	integer n;
	
	% for x:= -3.0 step 0.2 until 3.0 do %
	for n:= -30 step 2 until 30 do
	begin
		x := n * 0.1;
		y := exp (x);
		write( x); writeon( y); 
	end 

end
----stdout
Algol60 program changes:
- input/output functions
- no real control variable in for-loop