Proc bo’limi tarjimasi. Xatoliklar bo’lishi mumkin o’zim aniqlaganim 51 ni tarjimasi chala ekan. Hozircha qolganlari tog’ri bo’lsa kerak. Hammangizga omad!!! Proc PowerA3

Proc 20. TriangleP nomli funksiya hosil qilinsin, teng yonli uchburchakning asosi va balandligi berilsa uning perimetri hisoblansin (a va h haqiqiy son). Bu funksiya yordamida 3 ta uchburchakning asosi va balandligi berilsa, ularning perimetrini hisoblash dasturi tuzilsin. Uchburchakning yon tomoni Pifagor teoremasi bilan aniqlanadi:

Proc 21. SumRange nomli butun tipli funksiya hosil qilinsin, dan gacha bo’lgan barcha sonlar ( va ham) yig’indisi hisoblansin ( va - butun tipli o’zgaruvchilar). Agar 0 chiqarilsin. Bu funksiya yordamida agar sonlar berilsa, dan gacha va dan gacha bo’lgan sonlar yig’indisini hisoblash dasturi tuzilsin.