> પ્રકાર TFunctionParameter = વિધેય (કોષ કિંમત: પૂર્ણાંક): શબ્દમાળા ; . . . ફંક્શન વન ( કોસ્ટ મૂલ્ય: પૂર્ણાંક): શબ્દમાળા ; પરિણામ પરિણમે: = IntToStr (મૂલ્ય); અંત ; કાર્ય બે ( કોન્સ્ટ મૂલ્ય: પૂર્ણાંક): શબ્દમાળા ; પરિણામ પરિણમે: = IntToStr (2 * મૂલ્ય); અંત ; ફંક્શન ડાયનેમિકફંક્શન (એફ: ટીએફંક્શનપેમમીટર): સ્ટ્રિંગ ; પરિણામનું પરિણામ: = એફ (2006); અંત ; .