Ызбекистон республикаси олий ва ырта


END.  Natija: S=4.499... chiqadi


Download 1.28 Mb.
Pdf ko'rish
bet40/45
Sana26.10.2023
Hajmi1.28 Mb.
#1723178
1   ...   37   38   39   40   41   42   43   44   45
Bog'liq
Kitob 8779 uzsmart.uz

END. 
Natija: S=4.499... chiqadi. 
 
REPEAT Sikl operatori. 
Umumiy ko’rinishi: 
REPEAT STS UNTIL A; 
 Bu erda, STS - bajariladigan operatorlar guruxi. A – mantiqiy ifoda.
 
Operator quyidagicha ishlaydi: STS operatorlari bajariladi va A ifoda 
hisoblanadi. Agar A ifoda yolg’on (FALSE) bo’lsa, u holda STS operatorlari 
yana bajariladi. Agar A - rost (TRUE) bo’lsa, Sikl tugaydi. Agar Sikl boshida 
A - rost (TRUE) bo’lsa, STS operatorlari bir marta bajariladi. Agar A hech 
qachon rost (TRUE) qiymatini qabul qilmasa, u holda STS operatorlari 
cheksiz ko’p marta bajariladi va Sikllanish hosil bo’ladi. 
 
Misol 1:
 
 
 
 
REPEAT C:=C+1*X; X:=X-1 
UNTIL X=0; 
Birinchi C:=C+1*X; X:=X-1 operatorlari bajariladi va X=0 shart tekshiriladi. 
Agar X

0 bo’lsa, u holda yuqorida ko’rsatilgan operatorlar bajariladi: Agar 
X=0 bo’lsa, u holda boshqaruv UNTIL X=0; dan keyingi operatorlarga 
uzatiladi. 
 
MISOL 2:
1 1 1 


47 
 
 
S = 1+ --- + ---+ .... + ---- YIG’INDINI HISOBLANG. 
2 3 50
PROGRAM N2(OUTPUT); 
VAR S:REAL; N:INTEGER; 
BEGIN 
S:=0; N:=1; 
REPEAT S:=S+1/N; N:=N+1; 
UNTIL N>50; 
WRITELN (' S=',S) 
END. 
Natija: 4.499... 
FOR operatori. 
Umumiy ko’rinishi: 
FOR I:=N1 TO N2 DO ST; 
 
Bu erda, I - Sikl o’zgaruvchisi, N1- Sikl o’zgaruvchisining boshlang’ich 

Download 1.28 Mb.

Do'stlaringiz bilan baham:
1   ...   37   38   39   40   41   42   43   44   45




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