Urganch davlat universiteti axborot texnologiyalari kafedrasi

 

Masalaning yechilishi. Testlarning ularning har biriga sonlar ichkariga bo‘lgan tashqi for 

chiqishga  kiritamiz.  Sonlarni  saqlash  uchun  A:array  [1….100]  of  integer  massivi  yetarli. 

Kiruvchi F text bog‘langanidan va ochilganidan keyin testlarni katta tanlash uslubiy ko‘rinishiga 

ega.  

1-variant. Testlar ketma ketligini qayta  ishlovchi  “cheksiz” siklini hosil qilamiz uni n=0 

qiymatga o‘tilganida sikl to‘xtaydi. Mos keluvchi fragment quyidagicha bo‘ladi; 

 

readLn(F,m); 

for t:=

1 

to m do begin 

  readln(F,n); 

  

for i:=

1 

to n do read (F,A[i]); 

  readln(F); 

 

end; 

 

2-variant.  Agar  qiymatni  o‘qishdan  oldin  fayl  tugallangan  bo‘lsa,  testlar  ketma 

ketligining qayta ishlovchi “cheksiz ” sikl to‘xtatiladi.