begin
integer
i
real
r
name
fred fred == i fred == r
endofprogram