По представленной блок-схеме составьте программу вычисления
Добавлено: 24.02.2013 15:16:33По представленной блок-схеме составьте программу вычисления функции у при заданном с клавиатуры значении х
подскажите где и что исправить (добавить)
profram xy;
var x,y:real;
begin
write('Введите х=');
readln(x);
if x<=-50 then y:=7*x*x else (x>-50) and (x<=50);
if (x>-50) and (x<=50) then y:=abs(3x) else y:=2*x*x*x+1;
writeln('y=',y)
readln;
readln;
end.
подскажите где и что исправить (добавить)
profram xy;
var x,y:real;
begin
write('Введите х=');
readln(x);
if x<=-50 then y:=7*x*x else (x>-50) and (x<=50);
if (x>-50) and (x<=50) then y:=abs(3x) else y:=2*x*x*x+1;
writeln('y=',y)
readln;
readln;
end.