Составьте программу для вычисления значения функции: Y= |x|, ecли x<1; x1/2, для всех...

Question

Составьте программу для вычисления значения функции:

Y=

|x|, ecли x<1;</p>

x1/2, для всех остальных x.

Answer 1

var x,y:real;
begin
writeln('Vvedite x');
readln(x);
if x<1 then y:=abs(x) else y:=x*1/2;<br>writeln(y);
end.