Урок по информатике. 10 класс. Язык программирования – Turbo Pascal.

  • doc
  • 10.11.2021
Публикация на сайте для учителей

Публикация педагогических разработок

Бесплатное участие. Свидетельство автора сразу.
Мгновенные 10 документов в портфолио.

Иконка файла материала ператоры цикла языка Pascal. 10 класс.doc

 Урок по информатике. 10 класс.

Язык программирования – Turbo Pascal.

 

Тема:  Операторы цикла.

            (Третий урок по теме: «Операторы цикла».)

Цели: Образовательная:

1) Закрепление навыков в составлении программ с использованием различных  циклов.

            2) Использование цикла и ветвления в одной программе.        

            Развивающая:

            Развитие умений обобщать, систематизировать и применять знания, полученные   ранее.

            Воспитательная:

            Формирование навыков самостоятельной работы и воспитания самоконтроля учащихся.

Тип урока: Урок применения знаний, навыков и умений.

Обеспечение урока: 1) Тесты на 2 варианта.

                                    2) Карточки с задачами.

                                    3) Файл Forma.pas.

План урока:

1)      Организационный момент;

2)      Сообщение цели и темы урока;

3)      Самостоятельная работа;

4)      Постановка задачи, обсуждение плана её решения;

5)      Практическая работа;

6)      Подведение итогов урока.

 

Содержание урока:

1)      Организационный момент.

2)      Сообщение темы и цели урока.

3)      Самостоятельная работа.

Учащимся предлагается выполнить тестовое задание (по вариантам).

Цель: Проверить, владеют ли учащиеся всеми изученными видами циклов (с параметром, с постусловием, с предусловием); умеют ли делать оптимальный выбор цикла для каждой конкретной задачи.

 

Тест №1  (1 вариант)

Тема: Операторы цикла.

 

  1. С помощью каких служебных слов  записывается оператор цикла с постусловием?

a)       While…do…

b)       Repeat…until…

c)       If…then…else…

d)       Fordo

  1. Сколько раз выполнится оператор, стоящий в цикле:

      For i:=0 to m do y:=y*а;?

a)      m

b)      m-1

c)      m+1

d)      много

  1. При истинности какого условия будут исполняться операторы в цикле:

      While x<=x1 do begin

f:=x+x+2.4;

x:=x+0.2;

end;

a)      x<=x1;

b)      f:=x*x+2.4;

c)      x:=x+0.2;

d)      x>x1

4.      Какой цикл удобнее всего использовать для задачи: Дано действительное число   х. Вычислить бесконечную сумму:

a)      Цикл с предусловием

b)      Цикл с параметром

c)      Условный оператор

d)      Цикл с постусловием

  1. Задача: Пусть даны числа a, b (a>1, b>a). Получить первый элемент последовательности a, a2, a3, a4…, больший числа b.

Выберите фрагмент программы, отвечающий решению данной задачи.

a)      p:=1;

Repeat

                p:=p*a;

       until p>b;

 

b)      p:=1;

while p>b do p:=p*a;

 

c)      p:=1;

repeat

                  p:=p*a;

       until p<b;

 

d)      p:=1;

if p>b then p:= p*a

 

 

Тест №2 (2 вариант)

Тема: Операторы цикла.

 

  1. С помощью каких служебных слов  записывается оператор цикла с предусловием?

e)       While…do…

f)        Repeat…until…

g)       If…then…else…

h)       Fordo

  1. Сколько раз выполнится оператор, стоящий в цикле:

      For i:=0 to n-1 do y:=y*а;?

a)      n

b)      n-1

c)      n+1

d)      много

  1. При ложности какого условия будут исполняться операторы в цикле:

Repeat

f:=x+x+2.4;

x:=x+0.2;

until x>x1

e)      x<=x1;

f)       f:=x*x+2.4;

g)      x:=x+0.2;

h)      x>x1

9.      Какой цикл удобнее всего использовать для задачи: Дано действительное число   х. Вычислить бесконечную сумму:

a)      Цикл с предусловием

b)      Цикл с параметром

c)      Условный оператор

d)      Цикл с постусловием

  1. Задача: Пусть даны числа a, b (a>1, b>a). Получить все члены   последовательности a, a2, a3, a4…, меньшие числа b.

Выберите фрагмент программы, отвечающий решению данной задачи.

e)      p:=1;

while p>b do begin

                       p:=p*a;

                       write (p,’ ‘);

                       end;

f)       p:=1;

repeat

            p:=p*a

            write(p,’ ‘);

until p<b;

g)      p:=1;

if p<b then p:=p*a;

write(s,’ ‘);

h)      p:=1;

while p<b do begin

                       p:=p*a;

                       write(p,’ ‘);

                       end;

Работа рассчитана на 8-10 минут.

Результаты выполнения теста учащиеся сдают вместе с д/з.

Далее следует устная проверка правильных ответов на вопросы, предложенные в тесте. На этом этапе учащиеся смогут сами оценить свою работу и выставить себе предварительную оценку.

4)      Постановка задачи, обсуждение плана её решения.

Во время выполнения учащимися тестового задания раздать им карточки с индивидуальными заданиями следующего содержания:

Задача: Проверить тождество:

            В1: 1+2+3+…+n=n*(n+1)/2;

            B2: 1+3+5+…+(2*n-1)=n2;

            B3: 12+22+32+…+n2=n*(n+1)*(2*n+1)/6;

            B4: 13+23+33+…+n3=n2*(n+1)2/4;

            B5: 12+32+52+…+(2*n-1)2=n*(4*n2-1)/3.

Каждый учащийся записывает в тетрадь своё задание.

Обсуждение плана решения задачи по вопросам:

-          Что такое тождество?

-          Указать аргументы.

-          Указать результаты.

-          Сколько раз будем использовать цикл для решения данной задачи?

-          Как определить, верно ли тождество? Какой оператор будем для этого использовать?

Итак, наша программа будет состоять из следующих основных блоков:

-          Ввод аргументов (n);

-          Вычисление левой части тождества с помощью цикла;

-          Вычисление правой части тождества;

-          Сравнение левой и правой частей тождества и вывод результата.

5)      Практическая работа.

Цель: Формирование обобщенных умений.

На каждом ПК загружен файл Forma.pas – «скелет» будущей программы.

Составление, редактирование и трансляция программы, решение которой обсуждалось выше. 

Программа (B5):

Program togdestvo;

Uses CRT;

Var   i, S,n: integer;

Begin

CLRSCR;

Writeln (‘Программа проверки тождества: 12+32+52+…+(2*n-1)2=n*(4*n2-1)/3');

Write (‘Введите n=’); Readln(n);

S:=0; i:=1;

While i<=2*n-1 do begin

                                S:=S+i*i;           

                                i:=i+2;

                                end;

if  S= n*(4*n2-1)/3 then Writeln(‘ Тождество верно’) else Writeln (‘Тождество неверно’);

end.

 

Дополнительное задание: построить в тетради блок-схему в тетради для данной задачи.

6)      Подведение итогов урока.

По итогам практической работы выставить 2-3 оценки.

Д/з: Построить блок-схему и написать программу в тетради для рассмотренной задачи.

 

 

 

 

 

  

 

 

 

  

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Педагогические технологии, элементы которых использовались на уроке:

-         развивающая технология;

-         технология уровневой дифференциации;

-         компьютерная технология.

-          

Используемый на уроке метод как способ учебной работы:

Эвристический (3, 4, 5 этапы урока: усвоение знаний и умений путём рассуждений, требующих догадки, поиска, находчивости).

 

Методы организации учебно-познавательной деятельности:

-         аналитико-синтетический (3 этап урока);

-         проблемно-поисковый (4, 5 этапы урока);

-         практический (5 этап урока).

 

Методы контроля и самоконтроля:

-         письменный тестовый контроль (3 этап урока);

-         контроль выполнения практического задания (5 этап урока).