WHILE təkrarlanma operatoru.
Operatorun ümumi şəkli aşağıdakı kimidir:
WHILE <şərt> DO begin ;end;
Burada WHILE, DO - dilin ehtiyat (açar) sözləridir (ingiliscə “hələlik (yerinə yetirildiyi müddətdə)”, “etmək( yerinə yetirmək)” mənasını daşıyır);
<şərt> - məntiqi tipli ifadə və şərtdir;
- Turbo Paskalın ixtiyari operatorudur.
Operator aşağıdakı kimi işləyir: əgər şərt ödənirsə, yəni doğrudursa onda operator yerinə yetirilir və şərtin təkrar yoxlanması aparılır. Şərt ödənmədikdə idarəetmə növbəti sıradakı operatora verilir.
Nümunə2: P= ifadəsini n və b-nin ixtiyari qiymətlərində hesab-layan alqoritmin blok-sxemini və Paskal proqramını qurun.
Paskal proqramı:
PROGRAM MİSAL4:
USES CRT;
VAR
K, N: İNTEGER;
B, P: REAL;
BEGİN
READLN(N, B);
CLRSCR;
K:=1;
P:=1;
WHILE K<=N DO
BEGIN
P:=P*(SQRT(ABS(K+B)));
K:=K+1;
END;
WRITELN(‘N=’,N,’ B=’,B:5:2,’ P=’,P:9:2);
END.
Dostları ilə paylaş: |