Запишите на языке программирования вычисления по формуле y=1/x
Var x,y:real; begin read(x); y:=1/x; print(y); end.