Ахборот ва педагогик технологиялар факультети

2. Лаборатория ишини бажаришга мисол 
Топшириқ. Қўйилган масалани ечиш учун дастурий восита 
яратишнинг ҳамма босқичларини бажаринг. 
Тўғри тўртбурчакли майдоннинг бир томони иккинчи томонидан 5 м. 
узунроқ, уларнинг узунликлари йиғиндиси эса 17 м. Шу майдоннинг 
томонлари узунликларини аниқланг.
1- босқич. Масала шартини шакллантирамиз: Тўғри тўртбурчакнинг 
бир томони иккинчисидан Marta узунроқ, уларнинг йиғиндиси эса summa га 
тенг.
Масаланинг мақсади: Шу майдончанинг томонлари узунликларини 
топиш. Натижа экранга чиқарилади. Берилмалар real турига эга. 
2-босқич. Бу масаланинг математик модели тўғри тўртбурчакнинг 
томонларини қуйидаги тенгламадан топиш бўлади: 
a-b=5, a+b=17.
Бу формулалардан st=(summa - raz) / 2 ни ҳосил қиламиз, бу ерда биз
дастурлаш учун Паскаль алгоритмик тилини танлаймиз.
3-босқич. Чизиқли таркибли алгоритмдан фойдаланамиз.

---

36
 
4 -босқич. Қўйилган масаланинг Паскал тилидаги дастури: 
uses crt; 
var summa,marta,st: real; 
tomon1, tomon2: real; 
begin 
ClrScr; 
writeln('tomonlar yig’indisini kiriting'); 
readln(summa); 
writeln('bir tomon ikkinchisidan qanchaga uzunligi kiritilsin'); 
readln(marta); 
st:= (summa -marta) / 2; 
tomon1:= st; 
tomon2:= st + raz; 
write ('eni-', tomon1:7:2,'sm.'); 
write ('bo’yi-', tomon2:7:2,' sm.'); 
end. 
5 - босқич. Дастурни тушунтиришлар - изоҳлар билан таъминлаш 
мумкин. 
6 - босқич. Дастур компьютерда ишлатилгач қуйидаги тест 
берилмалари киритилди ва натижалар олинди: 
Берилмалар 
Натижалар 
Summa marta tomon1 tomon2 
15 
3 
6 
9 
Boshlanishi 
St=(summa-marta) 
Summa, marta 
1-Tomon= st; 
2-tomon= st + marta
1-tomon 
2-ttomon
Tugadi 

---

37
52 
8 
22 
30 
24 
0 
12 
12 
30 
5 
12,5 
17,5 
Бу тест натижалари дастурнинг тўғри ишлаётганлигини билдиради.
7-босқич. Тўғри тўртбурчакнинг икки томони йиғиндиси ва уларнинг 
айирмасини қуйидагича оламиз: 10 ва 4. У ҳолда st=3 бўлади ва у 
томонлардан бирининг учунлигидир (tomon1), иккинчи томон эса 7 га тенг 
бўлади.