52156

Програмування циклічних обчислень

Конспект урока

Педагогика и дидактика

Мета уроку: навчальна, навчитись практично застосовувати теоретичні відомості до розвязання задач; закріпити оформлення та запис на мові програмування; придбати практичні навички використання вказівок розгалуження та повторення при розв’язку задач;

Украинкский

2014-02-13

64.5 KB

13 чел.

Тема уроку: Програмування циклічних обчислень.

Практична робота 8 «Складання програм з використанням алгоритмічної структури повторення.»

Мета уроку: навчальна, навчитись практично застосовувати теоретичні відомості до розв’язання задач; закріпити оформлення та запис на мові програмування; придбати практичні навички використання вказівок розгалуження та повторення при розв’язку задач;

виховувати емоційну включенність; навчитись правильно застосовувати поняття та означення;

розвивати творче мислення та виконавчі здібності.

План уроку

I. Організаційний момент (2 хвилини)

II. Перевірка домашнього завдання. Опитування “Організація алгоритмів розгалуження та повторення мовою Turbo Pascal”. (5 хвилин)

IІІ. Практична робота 8 «Складання програм з використанням алгоритмічної структури повторення.» (30 хвивил)

ІV. Короткий розбір домашнього завдання на наступне заняття (5 хвилини)

V. Підведення підсумків уроку (3 хвилини)

Хід уроку

I. Організаційний момент. (3 хвилини)

Перевірка присутності. Перевірка наявності домашнього завдання.

II. Перевірка домашнього завдання. Опитування “Організація алгоритмів розгалуження та повторення мовою Turbo Pascal”.

Питання до класу:

  1.  Які форми умовного оператора, ви використовували при розв’язанні домашнього завдання?
  2.  Які оператори повторення Ви знаєте?
  3.  Як описується і використовується вказівка повторення з передумовою?
  4.  Як описується і використовується вказівка повторення з післяумовою?
  5.  Як описується і використовується вказівка повторення з параметрами?

IІІ. Практична робота 8 «Складання програм з використанням алгоритмічної структури повторення.» (Додаток 1)

Опорний конспект. 

Початковий, середній рівень – задача1, 2.

Достатній, високий рівень – задача 3, 4, 5. Доповнити 2-м варіантом розв’язку.

Алгоритм виконання практичної роботи:

  1.  Набрати в середовищі програмування програму.
  2.  Виконати компіляцію програми.
  3.  Зафіксувати результат виконання.
  4.  Зберегти файл розв’язку.  

ІV. Короткий розбір домашнього завдання на наступне заняття.

Скласти програми розв’язку задач.

1) Ввести число А, вивести всі його дільники та підрахувати їх загальну кількість.

2) Ввести 6 елементів  з клавіатури, визначити серед них найбільший.

3) Ввести дві змінні  X  та Y. Обчислити арифметичні дії за введеним знаком  d: +  -   *   / (додавання, віднімання, множення, ділення). Результат присвоїти змінній Z, та вивести.*

4) Намалювати малюнок знаками:  зірочка * або #,, використовуючи оператори циклу. *

V. Підведення підсумків уроку.

Запитання для бесіди:

  1.  Як ви гадаєте, чи виконали ми ті завдання, що поставили на початку уроку?
  2.  Які труднощі виникали у вас протягом уроку?
  3.  Що ви порадите однокласникам для подолання труднощів, що виникали?

Д/з. Скласти програми 1-4. За рівнем складності.


ДОДАТОК 1.

Задача 1. Вивести декілька разів своє ім’я або декілька разів своє ім’я та ім’я сусіда.

Program ima;

Uses crt;

Var i:integer;                  {і-лічільник}

Begin  Clrscr;

          Writeln(‘Виведення 5 разів свого імені в один рядок’);

          Writeln(‘---------------------------------’);

          For i:=1 to 5 do

                 begin

                   Write (‘Анастасія ’);

                 End;

          Writeln(‘Виведення 7 разів свого імені  та імені сусіда’);

          Writeln(‘----------------------------------’);

          For i:=7 downto 1 do

                 begin

                   Writeln (‘Анастасія  та Олена’);

                 End;

          Readln;

End.

Задача 2. Скласти програму підрахунку факторіала числа. Наприклад  10! (f=1*2*3*4*5*6*7*8*9*10)

Program factoril;

Uses crt;

Var i:integer;                 {і-лічільник}

      A:integer; f: real;     {А – число f – результат}

Begin  Clrscr;

          Writeln(‘Розрахувати факторіал числа’);

          Write(‘введіть число A=’);

           Readln(A);

           f:=1;             {початкове значення добутку}

          Writeln(‘---------------------------------’);

          For i:=1 to А do

                 begin

                   f:=f*i;

                 End;

Writeln(‘Розрахувати факторіал числа’);

          Write(‘введіть число A=’);

           Readln(A);

           f:=1;        {початкове значення добутку}

           i:=2;        {початкове значення}

          Writeln(‘---------------------------------’);

          While i<=A do

                 begin

                   f:=f*i;     {одна дія підрахунку}

                 i:=i+1;      {визначення наступного

значення}

                 End;

          Writeln(‘Результат f=’,f:6:2)

          Readln;

End.

Задача 3. Скласти программу знаходження суми 10 довільних чисел введених з клавіатури.

Program Summ;

Uses CRT;

Const  n = 10;     {розділ постійних значень}

Var I, x, S: integer;

Begin clrscr;

Writeln(‘Знаходження суми 10-ти довільних значень’);

S:= 0;                     {початкове значення суми}

Writeln(‘Введіть послідовно десять значень:   ’);

 for i:=1 to n do 

                 begin 

                      read (x);

 S:= S + х;

                end;

    ?

 writeln (‘Результат   суми S = ’, S);

 readln;

End.

Задача 4. Вивести на екран всі дільники даного натурального числа.

Program Deliteli;

Uses CRT;

Var N, I: integer;

Begin clrscr;

Writeln(‘Вивести дільники числа в один рядок’);

 write (‘Введіть число N= ’);

 Read(n);

Writeln(‘----------------------------------’);

Writeln;

 for i:=1 to n do 

                  begin

 if n mod i=0

                             then write(i:5);

                   end;

?

Readln;

End.

Задача 5. Скласти програму для знаходження суми чисел от 1 до 256, кратних числу 3.

Program kratni;

Uses CRT;

Var   S, I: integer;

Begin clrscr;

Writeln(‘Знаходження суми числа від 1 до 256, кратних 3’);

S:= 0;                     {початкове значення суми}

Writeln(‘----------------------------------’);

Writeln(‘Кратні значення: ’);

 for i:=1 to 256 do 

                  begin

 if i mod 3=0

                             then  begin

                                      S:=S+i;

                                      Write(i:3);

                                      end;

                   end;

?

writeln (‘Результат   суми S = ’, S);

 Readln;

End.

PAGE  4


 

А также другие работы, которые могут Вас заинтересовать

75005. Мова наша солов’їна, виховний захід 58 KB
  Показати дітям красу і багатство української мови за допомогою народної творчості, творів письменників і поетів. Викликати бажання вивчати рідну мову, милуватися її красою Виховувати любов до рідної мови, до своєї землі, свого народу.
75006. Мова моя українська чарівна. Виховний захід 40.5 KB
  Обладнання: зал прикрашений плакатами з крилатими висловами про мову прислівями плакати з назвами команд завдання загадки ребуси кросворди. І будемо зараз готові Полинути в країну рідного слова...
75007. Мово моя материнська, Сценарій свята 52 KB
  Чудова наша мова міцне моє коріння А як же я без нього могла б на світі жить Тоді б мене чекало духовне зубожіння Бо мову і Вітчизну не можна розділить Пісня О мово моя муз. Мов соловї наша мова співуча. Вірте не вірте Твердо я знаю: Мова це вірність рідному краю...
75008. Хімічна мозаїка, Сценарій з хімії 61 KB
  Ведуча: Вогонь у темряву ночей Приніс на землю Прометей. Ведуча доторкаючись до вогню: Я стверджую категорично: Реакція екзотермічна дує на палець. Ведуча звертається до кухаря: За сіль ви не забули друже Її відсутність не байдужа...
75009. Музыкальный тайник, внеклассное мероприятие для 7 класса 199 KB
  Мотивация интереса к непопулярным» музыкальным жанрам; пробуждение у учащихся заинтересованность в изучении предмета; активизация мыслительной и речевой деятельности; развитие музыкальной эрудиции, логического мышления; воспитание музыкально-познавательных потребностей и интересов в приобретении основы музыкально – исторических знаний, лидерских и коммуникативных качеств личности.
75010. Мусор – глобальная проблема человечества. Урок для устойчивого развития по программе «Моя счастливая планета» в 3-А классе 59 KB
  Цель урока: познакомить учащихся с терминами экология экологическая безопасность формировать представления об источниках и способах утилизации бытового мусора научить выполнять правила личной экологической безопасности познакомить с экологическими проблемами современности и путями их решения формировать ответственное отношение к использованию природных ресурсов земли.
75011. Відкриття музею історії козацтва, виховний захід 193.08 KB
  Карабинівці понад двісті років. Визнала вона і знущання панів Карабінова та Мизгова, і лихоліття громадянської війни, і голодомор, і трагічні події Великої Вітчизняної війни та вистояла. Сьогодні Карабинівка - одне з найкращих сіл Павлоградщини...
75012. Веснянки, виховний захід 60 KB
  Янушкевич веснянка А вже весна з опери Зима і весна М.Лисенка Хор А вже весна з опери Зима і весна. Діалог Діти а якою ви собі уявляєте весну Та яка ж весна без квітів Які ви знаєте весняні квіти Але першою розпускається гілочка верби а її розквітлі бруньки як називаються Котики Чи бачили ви їх які вони...
75013. Интонация – основа музыки, План-конспект урока музыки в 3 классе 332.5 KB
  Цели: Обучающая: формировать предметные компетентности: вокально-хоровую умение петь вокально правильно на дыхании музыкально-ритмическую умение выдерживать ритм и темп в движении под музыку исполнительскую умение выразительно и правильно передавать музыкальный образ...