solve-problem(A):
		for i:=1 to size(A) do
			Action on A[i];
		End-Action