Pascal va C++ dasturlash. Yusufov O

3- masala. N natural son va X haqiqiy sonlar berilgan. Quyidagi yig’indini
hisoblang sinx+sin 2x+...sinnx 
Yechish. Izlanayotgan yig’indini S bilan belgilaymiz. 
program misol 1; 
var n,i:byte; x,s:real; 
begin 
write('n='); read(n); 
write('x='); read(x); 
s:=0; x:=sin(x); 
#include  
#include  
#include  
int main () { 
int n,x; 
float s; 
Qiyosiy taqoslash 
Bu ikki misolda ham bir 
xil natijaga ega bo`lamiz. 
Lekin C++ dagi bu kod 
orqali 
 

---

43 
for i:=1 to n do 
s:=s+exp(i*ln(x)); 
write('s=',s); 
end. 
 
cin>>n>>x; 
s=0; x=sin(x); 
for (int i=1; i<=n; i++ ){ 
s=s+exp(i*in(x)); 
} 
cout<getch (); 
return(0);} 
for (int i=1; i<=n; i++ ) i 
ning tipini shu yerda
e’lon qilib o’tamiz 
pascal tilida hajimdan 
yutiq beradi C++ tilida 
vaqtdan yutiq berdi. 
3-masala. N natural son va A haqiqiy son berilgan. Quyidagi ko’paytmani hisoblang: 
A(A+1)(A+2) ... (A+N) 
Yechish. Berilgan ko’paytmani k bilan belgilaymiz. 
program misol 7; 
var a,p:real;i,n:integer; 
begin 
write('n='); read(n); 
write('a='); read(a); 
p:=1; 
for i:=0 to n do 
p:=p*(a+i); 
write('p=',p); 
end. 
 
#include  
#include  
int main (){ 
int n; 
float p,a; 
cin>>n>>a; 
p=1; 
for (int i=1; i<=n; i++){ 
p=p*(a+i); 
} 
cout<
getch(); 
return (0); 
} 
Qiyosiy taqoslash 
Bu ikki misolda ham bir xil 
natijaga ega bo`lamiz. 
Lekin C++ dagi bu kod 
orqali 
for (int i=1; i<=n; i++) 
C++ tilida vaqtdan 
hajimdan yutiq berdi. 

---

44 
Demak, texnologiyalar tahlili shuni ko`rsatadiki, bu ikkala dasturlash tillarida 
ishlaganda quydagilarga etibor berish lozim:
1.
Pascal va C++ tilida dastur yozayotganda joy tashlashlarni kelishilgan aniq bir 
qoida asosida olib borgan ma’qul; 
Masalan, dastur sodda o`qilishi va ko`rinishiuchun tabulyatsiyani 4 ta probel 
deb qabul qilish mumkin; 
2.
Pascal va C++ tillarida dastur oson o`qilishi uchun har bir verguldan keyin 
probel tashlagan ma’qul; 
3.
O`zgaruvchilarni e`lon qilishni boshqa operatorlardan bo`sh satr bilan ajratib 
qo`ygan ma’qul; 
4.
(+,-,*,/) kabi amallarning har ikkala tomonidan probel qo`yish, dasturning 
o`qilishini qulaylashtiradi. 

---

45