Question

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

Answer 1

program kl;
var x,y:real;
begin
writeln ('ввести 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......... Но это панкаль.абс.нет я не знаю че у него на уме... в школе всё работало.

Answer 2

Большое спасибо!!!