سوڭعى جاڭارتۋ

(وزگەرتىلگەن ۋاقىتى 5 كۇن بۇرىن)
سيكلدىڭ العى شارتى
ماڭعىستاۋ اۋدانى، تۇششىقۇدىق اۋىلى.
ينفورماتيكا ءپانى ءمۇعالىمى كەنەبايەۆا ج.

ينفورماتيكا 8 - سىنىپ
ساباقتىڭ تاقىرىبى: سيكلدىڭ العى شارتى
ساباقتىڭ تاقىرىبى: وقۋشىلارعا Pascal پروگراممالاۋ سيكلدىك الگوريتمدەردى پروگراممالاۋ تۋرالى تۇسىنىك بەرۋ - سيكلدىڭ تۇرىمەن تانىستىرۋ وپەراتورلاردىڭ جازىلۋ ەرەجەسىن ءتۇسىندىرۋ.
كورنەكىلىكتەر: وقۋلىق ديداكتيكالىق ماتەريالدار
كۇتىلەتىن ناتيجە:
 While، do وپەراتورلارىن بىلەدى؛
 سيكلدىڭ جازىلۋ تۇرىمەن تانىسادى؛
 الگوريتمىن قۇرا الادى.
 قىسقا سويلەۋگە ۇيرەنەدى؛
قولدانىلاتىن ءادىس - تاسىلدەر: توپتىق جۇمىس، ستو، ديالوگ، جەكە جۇمىس، ءتۇرتىپ الۋ ءادىسى.
قادامدار:
1. ۇيىمداستىرۋ
2. ءۇي تاپسىرماسىن تەكسەرۋ (كومپيۋتەرگە سالىپ، ناتيجەسىن كورسەتۋ)
3. توپپەن جۇمىس
4. رەفلەكسيا
5. باعالاۋ

بلۋم جۇيەسى: توپقا ءبولۋ

ءى. ءبىلۋ. «ميعا شابۋىل»
سۇراقتارى:
1. الگوريتمنىڭ تولىق جانە قىسقاشا شارتتارى قانداي؟
2. سيكلدىك الگوريتم دەپ نەنى ايتامىز؟
3. سيكلدىك الگوريتم وپەراتورلارى قانداي

ءىى. ءتۇسىنۋ.
الدىن الا بەرىلگەن شارت بويىنشا قايتالاۋ. ەگەر ەسەپتە قايتالانۋدىڭ سانى بەلگىسىز بولسا، الدىن الا بەرىلگەن شارت بويىنشا قايتالاۋ وپەراتورى قولدانىلادى. ءتۇيىندى سوزدەرى While – ازىرشە، do – ورىنداۋ. شارت While سوزىنەن كەيىن جازىلادى، do – دان كەيىن سيكل دەنەسى جازىلادى. جالپى جازىلۋ ءتۇرى:
I:=m1؛
While i≤(≥) m2 do
Begin
؛

؛
I:=i+(-) m3
End؛
الگاريتمدىك تىلدە
ءازىر شارت
سب
سيكل دەنەسى
سس

ءىىى. قولدانۋ. جاڭا تاقىرىپتى وزدىگىنەن مەڭگەرۋ.
مىسال: ءبۇتىن سانداردىڭ قوسىندىسىن تابۋ پروگرامماسىن قۇرىڭىز.
program esep2؛
var s، i، n: integer؛
begin
s:=0؛ i:=1؛
write ('butin san engiz')؛
read(n)؛
while i<=n>
begin
s:=s+i؛ i:=i+1؛
end؛
write ('kosyndy s='، s)؛
end.

butin san engiz5
kosyndy s=15

IV. تالداۋ. وي تولعانىس 1. تاق سانداردىڭ كۆادراتتار كەستەسىنىڭ پروگرامماسىن قۇرۋ كەرەك.
program esep2؛
var x، y: integer؛
begin
x:=1؛
while x<=15>
begin
y:=sqr(x)؛
x:=x+2؛
writeln ('x='، x، ' '، 'y='، y)؛
end؛
end.

x=1 y=1
x=3 y=9
x=5 y=25
x=7 y=49
x=9 y=81
x=11 y=121
x=13 y=169
x=15 y=225

سانداردىڭ كۋبتارىن كەستەسىن قۇرۋ.
program esep2؛
var a، b: integer؛
begin
a:=- 10؛
while a<=10>
begin
b:=a*a*a؛
writeln ('a='، a، 'b='، b)؛
a:=a+2؛
end؛
end.

a=- 10b=- 1000
a=- 8b=- 512
a=- 6b=- 216
a=- 4b=- 64
a=- 2b=- 8
a=0b=0
a=2b=8
a=4b=64
a=6b=216
a=8b=512
a=10b=1000

نازار اۋدارىڭىز! جاسىرىن ءماتىندى كورۋ ءۇشىن سىزگە سايتقا تىركەلۋ قاجەت.

You Might Also Like

جاڭالىقتار

جارناما