Bеysik (paskal) tilining grafik imkoniyatlari


Download 153 Kb.
bet8/13
Sana02.01.2022
Hajmi153 Kb.
#190439
1   ...   5   6   7   8   9   10   11   12   13
Bog'liq
2 5469694852079814834

Metkalar bo‘limi
Programmaning ixtiyoriy operatorini boshqa operatorlar orasida ajratib ko‘rsatish mumkin. Metkalar, programmada o‘tish operatoridan foydalangandagina ishlatiladi. Metka sifatida oddiy identifikatorlardan yoki sonlardan foydalanilsa bo‘laveradi. Programmada ishlatilgan barcha metkalar label xizmatchi so‘zidan keyin boshlanuvchi metkalar bo‘limida ehlon qilinib qo‘yilishi kerak:
::=label ;
Metkalarning nomlari original, yahni o‘xshashi yo‘q bo‘lishi kerak.
Misol: label L1, L2, A3;
Bu yerda L1, L2, A3 lar programmada ishlatiluvchi metkalarning nomlari.
Label m10, m20, Sto‘Label, 1;

Var

I:ShortInt;

Begin

1:

If i<10 Then Goto m10 Else Goto m20;

m10: Writeln(‘i kichik 10 dan’);

Goto Sto‘Label;

M20: i:=i-1;

Goto 1;

Sto‘Label:

End.


Download 153 Kb.

Do'stlaringiz bilan baham:
1   ...   5   6   7   8   9   10   11   12   13




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling