begin
longinteger
l
longreal
x l=27 l=l+1 x=l printfl (x,5) newline
endofprogram