Как найти число обратное заданному в Паскале?

Обра́тное число́ (обратное значение, обратная величина) — это число, на которое надо умножить данное число, чтобы получить единицу. Пара чисел, произведение которых равно единице, называются взаимно обратными.
Для всякого числа рационального, действительного или комплексного a, не равного нулю, существует обратное 1/a.
Обратной величиной нуля является бесконечность. Однако, в арифметике нет понятия бесконечности, поэтому в ней считается, что ноль не имеет обратного числа.
Обратные дроби — это две дроби, произведение которых равно 1. Например, 3/7 и 7/3; 5/8 и 8/5 и т.  д.

В паскале

var x:real
begin
x:=123;
if x<>0 then Write('Обратное число для ',x,' равно ', 1/x)
else Write('Число ',x,' не имеет обратного');
end.