Yechimi: Pascal tilida



Download 46,47 Kb.
bet4/4
Sana06.11.2022
Hajmi46,47 Kb.
#861281
1   2   3   4
Bog'liq
Begin

Yechimi:

Pascal tilida


C++ tilida


#include


#include
#include
int main()
{
float A,B;
cout<<"Ikkita A va B sonlarni kiriting:\n";
cout<<"A = "; cin>>A;
cout<<"B = "; cin>>B;
float temp;
temp=A;
A=B;
B=temp;
cout<<"Ikki sonning qiymatlari o`zaro almashdi:\n";
cout<<"A = "<A ni qiymati В gа, В ni qiymati С ga va С ni qiymati A ga almashtirilsin. A, В va С ning yangi qiymatilari ekranga chiqarilsin.


Yechimi:

Pascal tilida


C++ tilida


#include


#include
#include
int main()
{
float A,B,C;
cout<<"Uchta A, B va C sonlarni kiriting:\n";
cout<<"A = "; cin>>A;
cout<<"B = "; cin>>B;
cout<<"C = "; cin>>C;
float temp;
temp=A;
A=B;
B=C;
C=temp;
cout<<"Uchta sonning qiymatlari o`zaro almashdi:\n";
cout<<"A = "<cout<<"A = "; cin>>A;
cout<<"B = "; cin>>B;
cout<<"C = "; cin>>C;
float temp;
temp=A;
A=C;
C=B;
B=temp;
cout<<"Uchta sonning qiymatlari o`zaro almashdi:\n";
cout<<"A = "<cout<<"X = "; cin>>x;
float y=3*pow(x,6)-6*pow(x,2)-7;
cout<<"Javob = "<getch();
}

Begin26. x ning qiymati berilganda y=4(x-3)6-7(x-3)3+2 funksiyaning qiymati aniqlansin.




Yechimi:

Pascal tilida


C++ tilida


#include


#include
#include
int main()
{
float x;
cout<<"y=4(x-3)^6-7(x-3)^3+2 funksiya uchun x ning qiymatini kiriting:\n";
cout<<"X = "; cin>>x;
float y=4*pow(x-3,6)-7*pow(x-3,3)+2;
cout<<"Javob = "<getch();
}

Begin27. A soni berilgan. A ning A2, A4, A8 darajalarini aniqlovchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


#include


#include
#include
int main()
{
int A;
cout<<"A ning qiymatini kiriting = "; cin>>A;
cout<<"A^2 = "<
cout<<"\nA^4 = "<
cout<<"\nA^8 = "<
getch();
}

Begin28. A soni berilgan. A ning A2, A3, A5 ,A10, A15 darajalarini aniqlovchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


#include


#include
#include
int main()
{
int A;
cout<<"A ning qiymatini kiriting = "; cin>>A;
cout<<"A^2 = "<
cout<<"\nA^3 = "<
cout<<"\nA^5 = "<
cout<<"\nA^10 = "<
cout<<"\nA^15 = "<
getch();
}

Begin29. α burchak gradusda berilgan (0<α<360). Berilgan burchakning qiymatini radianga o'tkazuvchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin30. α burchak radianda berilgan (0<α<2π). Berilgan burchakning qiymatini gradusga o'tkazuvchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin31. Temperatura TF Farengeytda berilgan. Temperatura qiymatini TC gradus selsiyga o'tkazuvchi programma tuzilsin. TC=(TF-32)*5/9




Yechimi:

Pascal tilida


C++ tilida


Begin32. Temperatura TC gradus Selsiyda berilgan. Temperatura qiymatini TF Farengeytga o'tkazuvchi programma tuzilsin. TC=(TF-32)*5/9




Yechimi:

Pascal tilida


C++ tilida


Begin33. X kg konfet A so'm turadi. 1 kg va Y kg konfet qancha turishini aniqlovchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin34. X kg shokolad A so'm turadi va Y kg konfet В so'm turadi. 1 kg shokolad 1 kg konfetdan qancha qimmat turishini aniqlovchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin35. Qayiqning tezligi V km/soat, daryo oqimining tezligi U km/soat (V>U) Qayiqning daryo oqimi bo'yicha xarakatlanish vaqti T1, oqimga qarshi T2 Qayiqni yurgan S yo'lini aniqlovchi programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin36. Birinchi avtomabilning tezligi V1 km/soat ikkinchisiniki V2 km/soat, ular orasidagi masofa S. Ular biri-biridan uzoqlasha boshlasa T vaqtdan keyin ular orasidagi masofani aniqlaydigan programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin37. Birinchi avtomabilning tezligi V1 km/soat, ikkinchisiniki V2 km/soat ular orasidagi masofa S. Ular biri-biri tomonga harakatlana boshlasa T vaqtdan keyin ular orasidagi masofani aniqlaydigan programma tuzilsin.




Yechimi:

Pascal tilida


C++ tilida


Begin38. A va В koeffisentlari berilgan, Ax+B =0 chiziqli tenglamaning yechimini (x ni) aniqlaydigan programma tuzilsin. A≠0




Yechimi:

Pascal tilida


C++ tilida


Begin39. А, В, С koeffisentlari berilgan, Ax2 + Bx+C = 0 kvadrat tenglamaning diskriminanti noldan katta bo'lsa uning yechimlarini aniqlaydigan programma tuzilsin. A≠0. X1,2 =




Yechimi:

Pascal tilida


C++ tilida




Begin40. A1, B1, C1, A2, B2, C2 koeffisentlari berilgan, chiziqli tenglamalar sistemasi yechimlarini aniqlaydigan programma tuzilsin.



Yechimi:

Pascal tilida




C++ tilida
Download 46,47 Kb.

Do'stlaringiz bilan baham:
1   2   3   4




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2025
ma'muriyatiga murojaat qiling

kiriting | ro'yxatdan o'tish
    Bosh sahifa
юртда тантана
Боғда битган
Бугун юртда
Эшитганлар жилманглар
Эшитмадим деманглар
битган бодомлар
Yangiariq tumani
qitish marakazi
Raqamli texnologiyalar
ilishida muhokamadan
tasdiqqa tavsiya
tavsiya etilgan
iqtisodiyot kafedrasi
steiermarkischen landesregierung
asarlaringizni yuboring
o'zingizning asarlaringizni
Iltimos faqat
faqat o'zingizning
steierm rkischen
landesregierung fachabteilung
rkischen landesregierung
hamshira loyihasi
loyihasi mavsum
faolyatining oqibatlari
asosiy adabiyotlar
fakulteti ahborot
ahborot havfsizligi
havfsizligi kafedrasi
fanidan bo’yicha
fakulteti iqtisodiyot
boshqaruv fakulteti
chiqarishda boshqaruv
ishlab chiqarishda
iqtisodiyot fakultet
multiservis tarmoqlari
fanidan asosiy
Uzbek fanidan
mavzulari potok
asosidagi multiservis
'aliyyil a'ziym
billahil 'aliyyil
illaa billahil
quvvata illaa
falah' deganida
Kompyuter savodxonligi
bo’yicha mustaqil
'alal falah'
Hayya 'alal
'alas soloh
Hayya 'alas
mavsum boyicha


yuklab olish