%begin
%integer i,j,k,l
%real a,b,c,d
i=1
  
a=1.0
j=k
%endofprogram