Program chik;
var x,y:real;
begin
readln(X);
if(x<>0)then begin
y:=1/x;
writeln(y);
end;
if(x=0)then writeln(FALSE);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.