TAKRORLANUVCHI JARAYONLARNI DASTURLASh
Takrorlanuvchi jarayonlarni dasturlash uchun tsikl ‘erat’rlarini ko’raylik.
Tsikl operatorini ko’rinishi quyidagicha :
for k: = A1 to A2 do S
Bu erda k-tsikl boshi , A2 –tsikl oxiri
s-tsikl tanasi. Ya`ni operator lar ketma-ketligi. Demak, shunday o‘qiladi.
k-parametr uchun A1 dan A2 gacha o‘zgarganda S operatorlar bajarilsin.
Masalan,
1) for k:=1 to 10 do s :=s+1;
2) for c:=n dowto 1 do h:=sqr (t)
Misol 3: s= ∑ √k uchun sikllik dastur tuzish talab etilsin.
Program sike (output , input);
var s: real
k: integer
begin
s:=0
for k=1 to 10 do s:=s+sqrt(k)
write (s)
end
Misol 4: s=∑ ∏ ek/2i+1
Bunday ko’rinishdagi misollar uchun sikl ichida sikl hosil qilinadi.
Ya`ni ichki va tashqi sikl alohida keltiriladi.
Program sikl ichi(output , input);
var
p ,s: real
k,i,g: integer
begin
s:=0;
for k=1 to 3 do
begin
p :=1
for i=2 o 6 do begin
p :=p* exp (k)/(2*i+1);
end ;
s:=s+p ;
end;
write (s);
end
Do'stlaringiz bilan baham: |