Вычислить f(x),используя составные условияf(x)=x, если 01, x

Question

Вычислить f(x),используя составные условияf(x)=x, если 01, x<=0в Паскале<hr>

Answer 1

var x,f:real;

begin

writeln('Введите значение x: ');

readln(x);

if (x>=0) and (x<=1) then</p>

begin

f:=x*2-x;

writeln('f = ',f);

end

else

begin

if (x>1) or (x<0) then</p>

f:=x*2;

writeln('f = ',f);

end;

end.