определить какое значение будет принимать переменнаz y после выполнения фрагментов
программы
Var x,y:integer ;
Begin
y:=0 ;
For x:=1 to 9 do
y:=y+1 ;
Writeln(`y=` , y )
end
помогите плииз до завтра