Mavzu: Shartsiz o’tish operatori Goto; Goto

5.Murakkabssikllar

Ko‘pchilik masalalarni echishda tuzilgan dasturda ichma-ich joylashganssikllar tashkil etishga to‘g‘ri keladi. Bundayssikllarga murakkabssikllar deyiladi. Murakkabssikllarda quyidagi talablar bajarilishi zarur.
ichkissikl tashqissikl ichida to‘liq yotishi kerak;
sikllar bir-biri bilan kesishmasligi kerak;
sikl ichiga tashqaridan to‘g‘ridan-to‘g‘ri kirish mumkin emas;

sikl parametrlari har xil identifikatorlar bilan belgilanishi kerak;

Misol:  ifodani hisoblash dastursini tuzing.
Program SP;

Var i,j: Integer; S,P: Real;
Begin
S:=0;
For i:=1 to 10 do
Begin
P:=1; For j:=1 to 5 do P:=P*(i+j)/Sqrt(i*j);
S:=S+P;
End; Write (‘S=’,S);
End.