Информатикадан сабақ жоспары "Процедуралар және функциялар" 10 сынып

Cабақ 9

Пән: Информатика

Сынып: 10

Сабақтың тақырыбы Процедуралар және функциялар. Практикалық жұмыс

Сабақтың мақсаты:

1. Білімділік: Оқушыларды Visual Basic-тің процедуралары мен стандартты математикалық функцияларын программалауда қолдануға үйрету, Visual Basic ортасында функцияларды программалауға үйрету.

2. Дамытушылық: Оқушылардың дүниетанымын дамыту, Visual Basic программалау ортасында жұмыс жасау дағдысын дамыту

3. Тәрбиелілік: Оқушылардың информатика пәніне деген қызығушылығын жан-жақты тәрбиелеу.

Сабақтың түрі: Білімді бекіту және қортындылау сабағы

Сабақтың әдістері:, Практикалық, көрсету, жеке жұмыс

Сабақ жабдықтары: Электрондық оқулық, конспект, практикалық жаттығулар

Сабақтың жоспары:

1. Ұйымдастыру кезеңі. Оқушылармен амандасып, түгендеу.

2. Үй жұмысын тексеру:

Сұрақ қою

1. Жана сабақты бекіту

Практикалық жұмыс

«Калькулятор» жобасы

Басқару элементтерін пішін үстіне орналастырыңыздар:

-Проектіміздің түрі дайын, енді оқың қасиеттерін анықтайық.

Label 1 үшін: (сурет 2)

Caption-Первое число

Font-көпнұктеге басамыз, осы жерден шрифтің түрін, размерін орнатамыз (сурет 3)

Сурет 2 Сурет 3

Сурет 4

Дәл осындай қасиеттерді Label2 (Второе число), Label3 (Результат) үшін орнатамыз.

Text 1 үшін (сурет 4)

Имя - Число1

Text - Text1 –ді өшіріп тастаймыз, себебі бұл жерге бірінші санды (первое число) енгіземіз.

Дәл осындай қасиеттерді Text2 (Число2), Text3(Результат) үшін орнатамыз.

Command1 үшін: (Сурет 5)

Имя – Кл_сложения

Caption- «+»

Font – көпнұктеге басамыз, осы жерден шрифтің размерін, түрін орнатамыз.

Сурет 5.

Дәл осындай қасиеттерді Command2 (Кл_вычитания), Command3(Кл_умножения), Command4(Кл_деления) үшін орнатамыз.

Проектіні құрудың бірінші кезеңі аяқталды (сурет 6)

Сурет 6.

Проектінің екінші кезеңіне көшейік – программалау кезеңі.

«+» батырмасын екі рет сырт еткізіп басамыз, Visual Basic бағдарламасы бізге программа жазуды ұсынады! Жазайық.

Private Sub Command1_Click()

Результат.Text = Val(Число1.Text) + Val(Число2.Text)

End Sub

Дәл осындай бағдарламаны «-» батырмасы үшін жазамыз.

Private Sub Command2 _Click()

Результат.Text = Val(Число1.Text) - Val(Число2.Text)

End Sub

«*» батырмасы үшін:

Private Sub Command3_Click()

Результат.Text = Val(Число1.Text)*Val(Число2.Text)

End Sub

«/» батырмасы үшін:

Private Sub Command4_Click()

Результат.Text = Val(Число1.Text) /Val(Число2.Text)

End Sub

1. Сабақты қорытындылау. Өзіндік жұмыс

Біз тек Val (n) - n  жолды санға айналдыратын   функциямен жұмыс жасадық. Келесі фунцияларды өз жобаңызға қосыңыз:

Abs (n) - абсолютное значение n-ның абсолютті мәні
Atn (n) - n арктангенс радиан бойынша
Cos (n) - n косинус бұрыш 
Exp (n) - e константасын  n дәрежеге шығару 
Sgn (n) - тең –1,егер n0 
Sin (n) - n синус бұрышыn (n -радиан) 
Sqr (n) - n- квадрат түбір 
Str (n) - n  санын жолға айналдырадыру 
Tan (n) - n тангенс бұрышы (n -радиан) 
5. Бағалау

1. Үй жұмысын түсіндіру

Процедуралар және функциялар