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

program kl;var x,y:real;beginwriteln ('ввести x');readln (x);if x<=-100 then y:=5*x+10 else if -100<x<=0 then y:=x*x-1 else y:=x;writeln ('y=',y);end.ну вот так получилось, только он вот тут -100<x<=0 такую операция '<' не применима к типам integer и boolean......... Но это панкаль.абс.нет я не знаю че у него на уме... в школе всё работало.