Оператори розгалуження. Практична робота

План - конспект уроку

Оператори розгалуження. Практична робота.

Мета уроку:

1. Познайомити учнів з операторами розгалеження (повне, коротке);

2. Навчити учнів використовувати оператори розгалуження при створенні елементарних математичних програм;

3. Розвивати вміння виділяти головне у розглянутомі матеріалі, порівнювати, узагальнювати, логічно викладати свої думки;

4. Привити інтерес до предмету інформатики.

Тип уроку: практична робота.

Прилади та матеріали: операційна система Windows, мова програмування Turbo Pascal;

План уроку

І. Актуалізація знань.

ІІ. Практична робота.

1. Оператори розгалуження (повне, коротке);

2. Розв’язування задач.

І. Актуалізація знань.

1) Що таке мова програмування?

2) Що таке розгалуження? Оператори розгалуження;

3) Блок-схема повного розгалуження;

4) Властивості алгоритму;

5) Приведіть приклади задач з операторами розгалуження;.

6) Як можна описати алгоритм.? Способи опису алгоритмів.

II. Практична робота.

1) Оператори розгалуження (повне, коротке)

Команда розгалуження if (умовна команда) має два різновиди.

1. Повна команда розгалуження має вигляд:

if <логічний вираз> then <команда 1> else <команда 2>;

Дія команди. Якщо логічний вираз істинний, то виконується команда 1, в протилежному випадку — команда 2. Команди 1 та 2 можуть бути простими або складеними.

Приклад. Нехай х=9. У результаті виконання команд if x>7 then y:=x*x else y:=sin(x); if x<5 then z:=exp(x) else z:=sqrt(x); отримаємо y=81,z=3.

2. Коротка команда розгалуження має вигляд:

if <логічний вираз> then <команда>

Дія команди. Якщо логічний вираз істинний, то виконується їоманда 1, інакше виконується команда, яка знаходиться за даною конструкцією. Приклад. Нехай х=25. Тоді у результаті виконання команд if x>12 then у:=2*х; z:=10; if x<5 then z:=exp(x); гримаємо y=50,z=10.

Обчислити і вивести значення складеної функції у у деякій заданій користувачем точці, якщо

y = ln|x| х < -1,

у = sin(x), -1 <х < 1,

y = cos(x), х>1.

program Myfunction;

uses Crt;

var x,y:real;

begin

clrscr;

writeln('Введіть х');

readln(x);

if x < -1 then y:=ln(abs(x)) else

if (x>=-1) and (x

else y:=cos(x);

writeln('x=',x:5:2,' y=',y:5:2);

readln

end.

2) Розв’язування задач.

Розв’язати самостійно такі задачі:

1) Визначити, чи є трикутник зі сторонами a,b,c рівностороннім.

2) Визначити, чи є чотирикутник зі сторонами a,b,c,d ромбом.

3) Визначити чи існує трикутник зі сторонами a,b,c.

Підсумок уроку:

На сьогоднішньому уроці учні ознайомилися з операторами розгалуження (повне, коротке), навчилися складати елементарні програми з операторами IF та ознайомилися з основою мови програмуання turbo pascal.