program premenne; var x,y,z,v:integer; begin x:=1; y:=2; z:=3; writeln(2*x + 3*y - sqr(z)); v:= x - z div y; writeln(v); readln(v); writeln(v); x := x + y + z; y := x + y + z; z := x + y + z; writeln(x, y, z); readln; end.