Помогите пожайлуста. Блок-схема...Она у меня решена, но тут по видимому есть ошибка,

да

да

Program kl;
var x,y:real;
begin
writeln ('ввести x');
readln (x);
if xlt;=-100 then y:=5*x+10 else if -100lt;xlt;=0 then y:=x*x-1 else y:=x;
writeln ('y=',y);
end.


ну вот так вышло, только он вот здесь -100lt;xlt;=0 такую операция 'lt;' не применима к типам integer и boolean......... Но это панкаль.abs.нет я не знаю че у него на разуме... в школе всё работало.