Question

Составить программу по которой будет найдено значение операции

Answer 1

Программа, которая вычисляет значение функции:
var x,y:real; 
begin
write('x = '); readln(x);
if x<=0 then y:=x*x else y:=1/x;
writeln('y = ',y);
end.

Пример:
x = 5
y = 0.2

Answer 2

спасибо