|
Xossa
O‘rnatilgan qiymatlari
|
| bet | 105/111 | | Sana | 11.11.2022 | | Hajmi | 5.61 Mb. | | #29912 |
Bog'liq Dasturlash asoslari download, 6 5A21101-Adabiyotshunoslik(o\'zbek adabiyoti) Dastur, Web, Amaliyot hisoboti, Ahmadjonov Sherbek , 1, 10, 9 jadid, 2 4м elektron тижорат raqamli imzo, obektivka-namuna-uzb, Haydash cho’kma hosil qilish, ekstraksiya xromotografiya ajratis-fayllar.org (1), 2. Bеnzin sifatiga qo`yiladigan ekspluatatsion talablar Bеnzinla-fayllar.org, avto, 8-mashg`ulotXossa
|
O‘rnatilgan qiymatlari
|
Form1
|
Caption
|
Sonni tashkil qiluvchi raqamlar yig‘indisini hisoblash
|
Label1
|
Caption
|
To‘rt xonali butun sonni kirirting
|
Label2
|
Caption
|
Raqamlar yig’indisi
|
Command1
|
Caption
|
Hisoblash
|
Command2
|
Caption
|
Tugatish
|
Text1
Text2
|
Text
|
Text xossasi maydonini tozalash
|
11.8-rasm
Dasturning kodi
Option Explicit
Private Sub Command1_Click()
Dim intN, intKE, intKD, intKS, intKT, intS As Integer
intN = Val(Text1.Text)
intKE = intN Mod 10
intN = intN \ 10
intKD = intN Mod 10
intN = intN \ 10
intKS = intN Mod 10
intKT = intN \ 10
intS = intKE + intKD + intKS + intKT
Text2.Text = Str(intS)
End Sub
Private Sub Command2_Click()
End
End Sub
4582
11.9-rasm
4582
19
11.20-rasm
If va Select boshqaruvtuzilmalari boshqaruv operatorlari yoki echim qabul qiluvchi konstruktsiyalar deb ataladi. Shu bois ular dastur operatorlarining odatdagi ketma-ket bajarilishini o‘zgartiradi. Bu konstruktsiyalar ishlatilmaganda dastur birinchi operatordan oxirgi operatorgacha ketma-ket bajariladi. Echim qabul qiluvchi operatorlarini qo‘llgash dasturda hosil bo‘lgan shartlarga boi‘lik holda aniqlangan amallarni bajarishga imkon beradi.
To‘rtta A, B, C va D haqiqiy qiymatlarini kiritib, ularning maksimal va minimal qiymatlarini chiqarishni dasturlash.
Algoritm
A, B, C, D larni kiritish.
A va B qiymatlarining kattasini aniqlash va uni R1 o‘zgaruvchisiga o‘zlashtirish.
C va D qiymatlarining kattasini aniqlash va uni R2 o‘zgaruvchisiga o‘zlashtirish.
R1 va R2 qiymatlarining kattasini aniqlash va uni MAX o‘zgaruvchisiga o‘zlashtirish.
A va B qiymatlarining kichigini aniqlash va uni R1 o‘zgaruvchisiga o‘zlashtirish.
C va D qiymatlarining kichigini aniqlash va uni R2 o‘zgaruvchisiga o‘zlashtirish.
R1 va R2 qiymatlarining kichigini aniqlash va uni MIN o‘zgaruvchisiga o‘zlashtirish.
MAX va MIN o‘zgaruvchilarining qiymatlarini chop etish
11.21-rasm
|
| |
