1- misol.ifodaning qiymatini hisoblash dasturini tuzing. programsumma; var S,a, b, x,:real; k,n:integer; begin S:=0; S1:=0; read(a, b, x); for k:=1 to 15 do {tashqi sikl boshi} begin for n:=1 to 10 do {ichki sikl boshi} begin S:=S + 2* (exp(k*ln(A)) + exp(n*ln(x))); end;{ichki sikl oxiri} S1:=S1+S; end;{tashqi sikl oxiri} S1:=(b+a)*S1; write('S1=',S1) end.
2- misol.ifodani hisoblash dasturini tuzing. program summa; vari,j : integer; xo,h,xn,x,So,P,P1:real; beginP:=1; beginS:=0; p1:=1; for i:=1 to 5 do for j:=1 to 10 do begin p:=p*i; p1:=p1*j; end; S:=S +(p + p1); end; writeln('S=',s); end. 8,9,10,11-amaliy mashg’ulotlar uchun mustaqil topshiriqlar
1-topshiriq
a) ni hisoblang.
b) 1 dan n gacha toq sonlar kvadratlari yig’indisini hisoblang.
c) ni hisoblang
2-topshiriq
a) ni hisoblang.
b) [a,b] oraliqda m soniga karrali sonlar ko’paytmasini hisoblang
c) ni hisoblang.
3-topshiriq a) ni hisoblang.
b) 1 dan 35 gacha bo‘lgan toq sonlar kvadratlarining yig‘indisi va juft sonlar kvadratlarining ko‘paytmasini toping.
c) ni hisoblang
4-topshiriq a) Berilgan son raqamlari yig’indisini hisoblash dasturini tuzing.
b) ni eps = 0,0001 aniqlik bilan hisoblang.
c) ni hisoblang
5-topshiriq a) ni hisoblang.
b) 2 dan 50 gacha 4 ga va 3 ga bo‘linadigan sonlarni chop eting.
c) ni hisoblang.
6-topshiriq a) [a,b] oraliqdagi m soniga karrali sonlar yig’indisini hisoblang.
b) ni eps = 0,001 aniqlik bilan hisoblang.
c) ni hisoblang
7-topshiriq a) ni hisoblang.
b) y=tg(x+c) funksiya qiymatini [a,b] oraliqda h qadam bilan hisoblang.
c) ni hisoblang.