Циклдік программалау бойынша практикалық сабақ: тестілеу, есептер мен Turbo Pascal қолдану

Скачать

19. 01. 11 ж.

Сабақтың тақырыбы:

Практикалық сабақ

Білімділік: Өтілген тақырып бойынша циклдік программалауға есептер шығару арқылы оқушылардың білімдерін пысықтау.

Дамытушылық : Оқушылардың жан-жақты ойлау қабілеттерін, компьютерді пайдаланып бағдарлама құру және жауабын алу дағдыларын дамыту.

Тәрбиелік: Оқушыларды ақпараттық мәдениеттілікке, өзін-өзі басқаруға және бағалауға тәрбиелеу.

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

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

Сабақтың әдісі: практикалық

Сабақтың көрнекілігі: дербес компьютерлер,

интерактивті тақта, активойд.

Әдістемелік және бағдарламалық қамсыздандыру:

Turbo Pascal 7. 0, презентация, бағалау парағы,

тест сұрақтары.

Әдістері: талдау, сұрақ- жауап, проблема қою,

зерттеу;

Пәнаралық байланыс: математика,

ағылшын тілі.

Сабақ жоспары

1. Ұйымдастыру сәті

2. Үй тапсырмасын тест арқылы тексеру

3. Программаның орындалу нәтижесін компьютерсіз

анықтау

4. Компьютерде тапсырманы өз бетімен орындау

5. Сабақты бекіту

6. Сабақты қорытындылау, үйге тапсырма беру

Үй тапсырмасын тест арқылы тексеру

ACTIVote

ACTIVote тестілеу жүйесі конференцияның барлық қатысушыларына сұрақтарға, бірнеше берілген жауаптардың нұсқаларынан желісіз радио пульттің батырмасын басу әдісімен жауап беруге мүмкіндік береді. Пульттың көмегімен ақпарат ACTIVboard қабылдайды және де өңделіп конференция қатысушысының жауабын қабылдайды. ACTIVote қарапайым тест жүргізуге өте қолайлы зат. ACTIVote 16 немесе 32 пульттан кішкене чемоданда тест жүргізу үшін қолданылады.

Программаның орындалу нәтижесін компьютерсіз анықтау.

1) begin

s:=0;

for x:=-4 to 1 do

s := s+х;

writeln(‘s=’, s) ;

end.

-9, 6рет

2) Program esep;

Var a1, a2, Integer;

Begin

а1:=4; a2=3; r:=a1+a2

Writeln (r) end.

7

3) a := 4; b := 6;

while a < b do a := a + 1;

a = 6, 2 рет

4) Егер z:=(x/5+y) *4 және х=5, y=10 болса, онда z-тың мәні неге тең?

44

Программаның орындалу нәтижесін компьютерсіз анықтау.

5) Программа үзіндісінің орындалу нәтижесін тап:

р:=0;

for x:=6 to 10 do

р := р+х;

writeln(‘р=’, р) ;

40, 5рет

6) s:=1;

for x:=2 to 6 do

s := s+х;

writeln(‘s=’, s) ;

21

7) Егер х:=0, х:=х+1, х:=х*х болса, онда х-тың мәні неге тең?

1

8) Программа бөлігіндегі m-нің мәнін анықтаңдар:

m:=0;

While m<3 do

m:=m+1;

3

Цикл неше рет орындалған?

a := 1;

for i:=1 to 3 do a := a+1;

a := 1;

for i:=3 to 1 do a := a+1;

a := 1;

for i:=1 downto 3 do a := a+1;

a := 1;

for i:=3 downto 1 do a := a+1;

a = 4

a = 1

a = 1

a = 4

Компьютерде тапсырманы өз бетімен орындау

1-есеп. 1-ден 100-ге дейінгі натурал сандардың қосындысын табыңдар.

2-есеп. 1, 2, 3, . . . , 15 сандары квадраттары кестесін құру керек.

3-есеп. 1-ден 10-ға дейінгі сандардың қосындысын есептеу бағдарламасын for операторының көмегімен жазыңдар.

Электрондық оқулық бойынша

№ 4, 5, 6, 14, 17, 18, 19 тапсырмаларды орындау

Үйге тапсырма

Екі санның ең үлкен ортақ бөлгішін (ЕҮОБ) табудың программасын құру.

• Іс жүргізу
• Автоматтандыру, Техника
• Алғашқы әскери дайындық
• Астрономия
• Ауыл шаруашылығы
• Банк ісі
• Бизнесті бағалау
• Биология
• Бухгалтерлік іс
• Валеология
• Ветеринария
• География
• Геология, Геофизика, Геодезия
• Дін
• Ет, сүт, шарап өнімдері
• Жалпы тарих
• Жер кадастрі, Жылжымайтын мүлік
• Журналистика
• Информатика
• Кеден ісі
• Маркетинг
• Математика, Геометрия
• Медицина
• Мемлекеттік басқару
• Менеджмент
• Мұнай, Газ
• Мұрағат ісі
• Мәдениеттану
• ОБЖ (Основы безопасности жизнедеятельности)
• Педагогика
• Полиграфия
• Психология
• Салық
• Саясаттану
• Сақтандыру
• Сертификаттау, стандарттау
• Социология, Демография
• Спорт
• Статистика
• Тілтану, Филология
• Тарихи тұлғалар
• Тау-кен ісі
• Транспорт
• Туризм
• Физика
• Философия
• Халықаралық қатынастар
• Химия
• Экология, Қоршаған ортаны қорғау
• Экономика
• Экономикалық география
• Электротехника
• Қазақстан тарихы
• Қаржы
• Құрылыс
• Құқық, Криминалистика
• Әдебиет
• Өнер, музыка
• Өнеркәсіп, Өндіріс