В чем ошибка? var a,b,h,y,x:real;m:integer; BEGIN a:=pi/4; b:=pi/2;m:=10; h:=(b-a)/m; x:=a; y:=cos(x)/sin(x);writeln(' x=',x,' y=',y); repeat x:=x+h; y:=cos(x)/sin(x);writeln(' x=',x,' y=',y); until x= больше b; END. Выдает ош...
В чем ошибка?
var
a,b,h,y,x:real;m:integer;
BEGIN
a:=pi/4; b:=pi/2;m:=10; h:=(b-a)/m;
x:=a; y:=cos(x)/sin(x);writeln(' x=',x,' y=',y);
repeat x:=x+h; y:=cos(x)/sin(x);writeln(' x=',x,' y=',y);
until x=>b;
END.
Выдает ошибку:Undefined FileName(0) : Нельзя преобразовать тип KeyValuePair к boolean
Гость
Ответ(ы) на вопрос:
ГостьПравильно будет until x>=b;
Не нашли ответ?
Похожие вопросы