Program n_1;Var a, b, x, y: real;BeginWriteln(039;Введите a039;) readln (x);Writeln(039;Введите

Program n_1;
Var a, b, x, y: real;
Begin
Writeln('Введите a')
readln (x);
Writeln('Введите b')
readln (b);
y:=3*x*x+x-4;
While xlt;=b do begin
x:=x+0,1;
Writeln('x=',x:3:2); -что будет на экране после исполненья этого оператора?
y:=3*x*x+x-4;
Writeln ('y=',y:3:2)
end
end.