Program primer_2;var x,y,z,s:real;begin writeln ('Введите значение x'); write('x='); readln(x);s:=ln(abs(y))+ abs(ln(z));if x меньше -2 then y:=2*x;if -2 меньше =x меньше =2 then y:=sin(x*e-3)+ln(abs(x));if x больше 2 then y:=p...
Program primer_2;
var x,y,z,s:real;
begin
writeln ('Введите значение x');
write('x='); readln(x);
s:=ln(abs(y))+ abs(ln(z));
if x<-2 then y:=2*x;
if -2<=x<=2 then y:=sin(x*e-3)+ln(abs(x));
if x>2 then y:=power((power(cos(sqr(x)),2)+ power(sin(power(x,3)),4)),4);
if x<0 then z:=power(sin(x),2);
if x>=0 then z:=power(e,-(sqr(x+3)));
writeln('Ответ');
writeln('s=',z:8:3);
end.
Ошибка в (if -2<=x<=2 then y:=sin(x*e-3)+ln(abs(x));) пишет что "Операция '<=' не применима к типам integer и boolean"
Кто сможет исправить?
Гость
Ответ(ы) на вопрос:
Гостьв паскале нельзя сравнивать более 2-ух чисел за раз в типе данных интеджер
и строчка
"if -2<=x<=2 then y:=sin(x*e-3)+ln(abs(x));"
должна выглядеть так:
if (-2<=x)and(x<=2) then y:=sin(x*e-3)+ln(abs(x));
Не нашли ответ?
Похожие вопросы