begin 
    real x, y;
        x := y := 0.0;
    real z;
end