Program t(output);
Label 7; var a,b:real;
Begin
……..
goto 7
………
7: a:=b*3
………
end.
Bu yerda boshqarish goto operatori orqali 7-metkaga (nomerga) utkazilayapti.
Metkalar turtta rakamdan oshmagan ishorasiz butun sonlar bo’lib, ular metkalarni tavsiflash bo’limida tavsiflanadilar.
Shartli o’tish operatori
SHartli o’tish operatori quyidagi umumiy ko’rinishdagi yozuvga ega:
А) if b1 then a1; kiska yozilishi,
В) if b1 then a1 else a2; to’liq yozilishi
Bu yerda b1- mantiqiy ifoda; a1 ,a2 -operatorlar. Operatorning a) ko’rinishdagi yozuvi agar mantiqiy ifoda TRUE kiymatga ega bo’lsa, a1 operatorni hisoblashni tashkil etadi, aks holda a1 bajarilmaydigan shartli operatordan keyin turadigan operator bajariladi. b) ko’rinishda agar mantiqiy ifoda TRUE kiymatni qabul kilsa, unda a1 operator bajariladi, aks holda a2 operator bajariladi. Shuni takidlash kerakki ELSE operatoridan oldin “;” nuqta-vergul quyilmaydi.
Masalan: if y>0 then d:=sqrt(y) else d:=y
Ya‘ni u>0 bo’lsa, d= bajariladi aks holda d=y bo’ladi.
Case operatori dasturda tarmoqlanishni tashkil etib, bir necha operatorlar orasidan birini tanlash imkonini beradi. Uning umumiy ko’rinishi quyidagicha;
Do'stlaringiz bilan baham: |