Найдите ошибку program minvaleev var a,b,x1: integer; y1, y2, x2: real; begin a: =3; x1: =2; x2: =-2; writeln('введите в'); readln(в); if x1> 0 then y1: =sqrt(a+sqr( y1: =2*a+b; if x2> 0 then y2: =sqrt(a+sqr( y2: =2*a+b; writeln ('minvaleev y1=',y1: 5: 3); writeln ('minvaleev y2=',y2: 5: 3); readln; end.
в строке readln(в); должна быть не русская "В", а английская, то есть readln(b);