Помогите пожайлуста. Блок-схема... Она у меня решена, но здесь по видимому есть ошибка, так как, если я подставляю любое число, он все равно вычисляет его по последнему условию.
Answers & Comments
12345YN12543
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......... Но это панкаль.абс.нет я не знаю че у него на уме... в школе всё работало.
Answers & Comments
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......... Но это панкаль.абс.нет я не знаю че у него на уме... в школе всё работало.