Dastur kodini umumiy ko`rinishini keltiramiz:
program ish;
var
q,p,x:real;
begin
write('q='); read(q);
write('p='); read(p);
x:=q+p+q*p/100;
write('x=',x); end.
3-masala. Massasi m, konsentrasiyasi x% bo`lgan eritma massasi n, konsentrasiyasi y% bo`lgan eritma bilan aralashtirilsa, massasi m+n, konsentratsiyasi bo`lgan eritma hosil bo`ladi.
Yechish: 300 gli eritmada konsentratsiyasi 15 % bo`lgan modda miqdori ga, 500 g li eritmada konsentrasiysini 9% bo`lgan modda miqdori g ga teng. Shuning uchun aralashmada bu moddaning miqdori 45+45=90 ga teng. Aralashma 300g+500g=800g bo`lgani uchun 90g uning ini tashkil qiladi.
Javob: 11,25%
Dastur kodini umumiy ko`rinishini keltiramiz:
program ish;
var
z,m,x,y,n:real;
begin
write('m='); read(m);
write('x='); read(x);
write('y='); read(y);
write('n='); read(n);
z:=(m*x+n*y)/(m+n);
write('z=',z);
end.
4-masala. Agar bankka Z yig`indini x foizga va y muddatga quyilgan bo`lsin, y muddatdan keyin olinadigan yig`indi hamda sof daromadni hisoblovchi dasturni tuzish talab qilinsin. Quyidagi formula yordamida hisoblang: (1)
Bu yerda x-bank foyzi. y-bankka quyilgan muddat, z – bankka quyiladigan yig`indi.
Formula (1) murakkab foizni hisoblovchi ifoda.
|