InfoHub Logo

Sabaqtyń taqyryby: "WINDOWS qosymshasyn jobalaý. Geometrıalyq esepke joba qurý".
Sabaqtyń maqsaty: ekran pishininiń kórinisin eskere otyryp, berilgen esepke joba qurýǵa daǵdylandyrý; baǵdarlamalyq kod qurý jáne ondaǵy sıntaksıstik, logıkalyq qatelermen jumys jasaı bilýge úırený.

Sabaqtyń tıpi: baqylaý, oqýshylardyń bilimin baıqaý, tekserý sabaǵy.
Qoldanylatyn ádis-tásilder: ádister-baıandaý, áńgime, taldaý; tásilder-kórnekilik, salystyrý, TSO

Sabaqtyń ótý barysy:
1. Sabaqty uıymdastyrý. (1-2 mın)
2. Daıyndyq kezeńi. (10-12 mın)
Suraqtar:
Aınymaly degen ne?
Aınymaly ataýyna qandaı shekteý qoıylady?
VB aınymalylardyń kelesi tıpteri qoldanylady:
integer - 2 baıt - -32768 den 32767 ge deıingi bútin sandar
long - 4 baıt - -2147483648 den 2147483647 ge deıingi bútin sandar
single - 8 baıt - ondyq sandar
string - joldyq shamalar
variant -16 baıt - kez-kelgen tıp
voolean - true, false - logıkalyq shamalar

3. Oqýshy bilimin tekserý. №9 praktıkalyq jumys.
A) eseptiń berilýi
Eseptiń qoıylýy: a, b, c qabyrǵalary boıynsha úshburyshtyń perımetrin jáne aýdanyn, a, b qabyrǵalary boıynsha tiktórtburyshtyń perımetrin jáne aýdanyn bir qosymshada jobala.
B) esepke model qurý
Matematıkalyq modeli Baǵdarlamalaýǵa arnalǵan model

Úshburyshtyń perımetri: P = a + b + c P = a + b + c
Úshburyshtyń aýdany: S
S = sqr(p / 2 * (p / 2 - a) * (p / 2 - b) * (p / 2 - c))
Tiktórtburyshtyń perımetri: P = 2 (a + b)
P = 2 * (a + b)
Tiktórtburyshtyń perımetri:
S= ab S = a * b
V)ekran pishininiń kórinisi
G) Ekran pishini kórinisin paıdalana otyryp, baǵdarlamalyq kodty josparlaý. Aınymaly tıpterin kórsetý.

Dim a As Single
Dim b As Single
Dim c As Single
Dim P As Single
Dim S As Single
Private Sub Command1_Click()
a = Val(Text1.Text)
b = ???
c = ???
p = ???
s = ???
Text4.Text = ???
Text5.Text = ???
End Sub
Private Sub Command2_Click()
???
???
???
???
???
End Sub
Private Sub Command3_Click()
a = ???
b = ???
p = ???
s = a * b
Text8.Text =???
Text9.Text = Str(s)
End Sub
Private Sub Command4_Click()
???
???
???
???
End Sub
4. Úı tapsyrmasy. (3 mın)
(tik buryshty úshburyshtyń eki kateti boıynsha, gıpotenýzasyn esepteý jáne bir kateti men gıpotenýzasy boıynsha ekinshi katetin esepteýdi jobalaý)
5. Bekitý (3 mın)
Val jáne Str fýnksıalarynyń mindetterine toqtalý
6. Baǵalaý. (2 mın)