// Program to store the squares of integers in an array
// and print them out again.
program
var 
	a = new [ 10 ],
	square = funct( x )
		begin
			return x * x;
		end,
	i; 
begin
	for i = 0; i < size a; i = i + 1 do
		a[ i ] = square( i );
	end
	for i = 0; i < size a; i = i + 1 do
		println( a[ i ] );
	end
end.