InfoHub Logo

ساباقتىڭ تاقىرىبى: تارماقتالۋ وپەراتورىنا ەسەپتەر شىعارۋ

ساباقتىڭ ماقساتى:
بىلىمدىلىك: وقۋشىلاردى پاسكال ءتىلىنىڭ IF، THEN، ELSE تارماقتالۋ وپەراتورىن پايدالانىپ باعدارلاما قۇرۋعا ۇيرەتۋ.
دامىتۋشىلىق: تارماقتالۋ وپەراتورىن پايدالانىپ، باعدارمالاما قۇرا وتىرىپ، وقۋشىلاردى ءوز بەتتەرىمەن باعدارلاما قۇرۋعا داعدىلاندىرۋ، لوگيكالىق ويلاۋ قابىلەتتەرىن دامىتۋ.
تاربيەلىك: وقۋشىلاردى پاتريوتتىققا، جاۋاپكەرشىلىككە تاربيەلەۋ.
ساباقتىڭ ءتۇرى: پراكتيكالىق ساباق
ساباقتىڭ ءادىسى: رەپرودۋكتيۆتى ءادىس
ساباقتىڭ كورنەكىلىگى: دەربەس كومپيۋتەر
ساباقتىڭ بارىسى:
ءى. ۇيىمداستىرۋ كەزەڭى

ءىى. ءۇي تاپسىرماسىن تەكسەرۋ

• قۇرىلىمدىق وپەراتورلارعا قانداي وپەراتورلار جاتادى؟
• قاراپايىم جانە قۇرىلىمدىق وپەراتورلاردىڭ ايىرماشىلىعى نەدە؟
• قۇراما وپەراتور دەپ قانداي وپەراتوردى ايتامىز؟
• شارتتى وپەراتورلاردىڭ قانداي تۇرلەرى بار؟
• تاڭداۋ وپەراتورى نە ءۇشىن قولدانىلادى؟
• CASE وپەراتورىنىڭ جالپى جازىلۋ ءتۇرى قانداي؟

ءىىى. كومپيۋتەرمەن جۇمىس

№1 ەسەپ: ەكى ساننىڭ ۇلكەنىن تاباتىن باعدارلاما قۇرۋ
Program esep_1؛
Uses crt؛
Var x، y، max: integer؛
Begin
Clrscr؛
Writeln(‘Eki sandy engiz…’)؛
Readln(x،y)؛
If x>y then max:=x else max:=y؛
Writeln(‘Eki sannyn ulkeni = ’، max)؛
End.

№2 ەسەپ: ءۇش ساننىڭ ۇلكەنىن تاباتىن باعدارلاما قۇرۋ
Program esep_2؛
Uses crt؛
Var x، y، z، max: integer؛
Begin
Clrscr؛
Writeln(‘Ush sandy engiz…’)؛
Readln(x،y،z)؛
If x>y then max:=x else max:=y؛
If max>z then max:=max else max:=z؛
Writeln(‘Ush sannyn ulkeni = ’، max)؛
End.

№3 ەسەپ: ادام جاسىنا قاراپ، ولاردى ءالى مەكتەپكە بارماعان، مەكتەپ وقۋشىسى، جۇمىسشى، زەينەتكەر دەگەن ءتورت توپتىڭ بىرىنە جاتقىزاتىن باعدارلاما قۇرۋ. ادام جاسى پەرنەتاقتادان ەنگىزىلەدى.
Program esep_3؛
Uses crt؛
Var x: integer؛
Begin
Clrscr؛
Writeln(‘Adam jasyn engiz…’)؛
Readln(x)؛
If x6) and (x17) and (xabs(y) then
begin
x:=x/5؛
writeln(‘x = ‘،x:5:2) end
else writeln(‘x = ‘،x، ‘ y = ‘،y)؛
End.


№5 ەسەپ: پەرنەتاقتادان ترامۆاي بيلەتىنىڭ نومەرى (1 ورىندى 6 سان) ەنگىزىلەدى. بيلەتتىڭ «باقىتتى» نومەر ەكەنىن انىقتايتىن باعدارلاما قۇرۋ كەرەك. باقىتتى بيلەتتىڭ العاشقى 3 سيفرىنىڭ قوسىندىسى سوڭعى 3 سيفرىنىڭ قوسىندىسىنا تەڭ.
Program esep_5؛
Uses crt؛
Var x، y، z، a، b، c، S، S1: real؛
Begin
Clrscr؛
Writeln(‘bilet nomerin engiz…’)؛
Readln(x، y، z، a، b، c)؛
S:=x+y+z؛
S1:=a+b+c؛
If S = S1 then writeln(‘bakitty nomer’)
else writeln(‘bakitty nomer emes’)؛
End.

IV. ساباقتى بەكىتۋ سۇراقتارى

• شارتتى وپەراتورلاردىڭ قانداي تۇرلەرى بار؟
• IF وپەراتورىنىڭ جالپى جازىلۋ ءتۇرى قانداي؟
• Writeln(ح:5:2) وپەراتورىنداعى 5 جانە 2 سيفرلارى نەنى بىلدىرەدى؟
• قانداي جاعدايدا IF وپەراتورى ەكى رەت قولدانىلادى؟

V. ۇيگە تاپسىرما بەرۋ
89 – 90 بەت، 12 جانە 13 جاتتىعۋلار.
VI. وقۋشى ءبىلىمىن باعالاۋ