Protsedura ha'm funksiya

Masele:
Procedure P(A:Char; B:Char; Var C:Real; Var D:Real; E:Char);
bul jerde formal parametrler dizimi bes seksiyadan ibarat: A,B,E – lar Char turli manisler, C, D – lar Real turidegi o‘zgeriwshiler. Sol menen bir qatarda har bir seksiya tek g'ana, bir parametrdi o‘z ishine alip atir.
Birdey turli, ha'mde izbe-iz jaylasqan manislerdi ha'm o‘zgeriwshilerdi bir seksiyag'a birlestirip protsedura qatarin tomendegishe jaziwg'ada boladi:
Procedure P(A,B:Char; Var C,D:Real; E:Char);
Solay etip, seksiya degande birdey turli parametr - manisler yamasa parametr - o‘zgeriwshilerinin' dizimin tusiniw mumkin.
Ko‘pshilik baslawshi programmashilar jol qo‘yatug'in tomendegi qateliklerden saq boliw tiyis:
Procedure P(Var X:Real; Y:Real);
bul qatar
Procedure P(Var X,Y:Real);
Qatari menen birdey emes.
Aniqlang'an protsedurag'a murajaat yamasa protsedura operatorinan qanday foydalaniwdi aniqlawdi ko‘ri0 shig'amiz (jaratilg'an protsedurani «Aktivlestiriw», ya’g'niy isletiw):

::=
½
()
Eger protsedura aniqlawda parametrsiz bo‘lsa, og'an murajaat qiliw ham faqat, protsedura atin jaziw menen amelge asiriladi.
Eger protsedura aniqlaniwi parametrli bo‘lsa, albette protsedura-operator ham unga mos faktik parametrlar ro‘yxatiga ega bo‘ladi. Sol parametrler arqali protsedurag'a murajaat qilinip atirg'an, formal parametrler aktivlestiriledi:
::= {, }
Protseduralardi aniqlaw ha'm olardan paydalaniwdi tomendegi masele jardeminde ko‘rip shig'amiz


2-masele. Ekrang'a 5 tsifrdi shig'ariwshi programma duzin'.
Programma kodi ha'm oynanin' uliwmaliq ko‘rinisi keltiriledi:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;