Agar A
0 bo’lsa, u holda V - o’zgaruvchi 1/A ni o’zlashtiradi, agar A=0
bo’lsa, 0 qiymatini o’zlashtiradi.
Eslatma 2: Quyidagi operatorning:
IF A1 THEN IF A2 THEN ST1 ELSE ST2;
sintaksis bir xil emasligi quyidagicha yoziladi(tushuniladi):
IF A1 THEN
BEGIN
IF A2 THEN ST1 ELSE ST2
END;
Misol:
IF A<>0 THEN IF B<>0
THEN C:=AG’B ELSE C:=0;
K:=-1;
Agar A
0 bo’lsa, u holda V
0 uchun S=A/V, V=0 uchun S=0 bo’ladi va undan
keyin K:=-1; operatori bajariladi. Agar A=0 bo’lsa, u holda boshqaruv
to’g’ridan to’g’ri K:=-1; operatoriga uzatiladi.
CASE operatori.
Umumiy ko’rinishi:
CASE N OF
M1, ... , MI: ST1;
K1, ... , KI: ST2;
.........................
END;
A:=B;
Bu erda, N - pereklyuchatel(selektor), MI, KI - belgilar (metkalar), ya’ni
(I=1,2,...). Bu belgilar LABEL bo’limida ko’rsatiladigan belgilardan
44
ishlatilishiga ko’ra farqlanadi. Pereklyuchatel va belgilar bir xil skalyar tipga
ega bo’lishlari kerak, faqat REAL (xaqiqiy) tipidan tashqari.
CASE operatori boshqaruvni N pereklyuchateli bilan mos tushuvchi
belgi bilan belgilangan ST1 operatoriga uzatadi va undan keyin boshqaruvni
END operatoridan keyingi operatorga uzatadi.
Misol 1:
CASE I OF
2: X:=0;
3: X:=X*X;
100 : X:=SIN(X);
END;
A:qB;
Agar I ning qiymati 3 ga teng bo’lsa, u holda X:=X*X; operatori bajariladi,
Do'stlaringiz bilan baham: |