> ફંક્શન પોઝિટિવ રેસીકોક્રોકલ (કોન્સ્ટ મૂલ્ય ઇન: ઇન્ટીજર; var મૂલ્યઉટો: રીયલ): બુલિયન; પરિણામનું પરિણામ: = મૂલ્ય> 0; જો પરિણામ પછી મૂલ્યઉપ: = 1 / મૂલ્ય ઇન; અંત ;