Урок-практика по работе с условными операторами (8 класс)

Тема: Условный оператор if ... then ... else

Цель: дать понятие об условном операторе, блок-схемах, изображающих такие операторы Научиться на частных примерах составлять блок-схемы и программы; вводить и выполнять программы, используя Turbo Pascal.

I. Теоретический материал. Человек, принимая какое-то решение, может сомневаться, взвешивать, прикидывать, машина принимает решения категорически: либо - да, либо - нет и никаких сомнений.

Схемы условных  алгоритмов:

Неполное условие:

Полное условие:

Для реализации принимаемых решений на языке Паскаль могут быть использованы операторы if (если), then (тогда) и else (иначе).

II. Практическая работа.
1. Составить алгоритм  решения квадратного уравнения 3х²-10х+3=0

Зарисуйте алгоритм в виде блок-схем в тетрадь, впишите команды в блоки, используя словесный алгоритм.

 

2. Записать программу решения квадратного уравнения 3х²-10х+3=0 по алгоритму. Допишите пустые операторы.

Program kwur;

Uses CRT;

Var a,b,c,d,x1,x2: real;

Begin   Clrscr;

Writeln('введите коэффициенты уравнения a,b,c');

Write('a=');Readln(a);

Write(………..);Readln( );

Write(………..);Readln( );

D:= ………………;

If d < 0 then writeln('действительных корней нет');

If d = 0 then Begin X1:= -b / (2*a); Writeln('x1=x2=',x1:6:2); END

Else  Begin

X1:=(-b+sqrt(d))/(2*a);

X2:=(-b-sqrt(d))/(2*a);

Writeln('x1=',x1:6:2,' x2=',x2:6:2)

END;  Readln;   End.

III. Самостоятельная работа. Решить следующие квадратные уравнения и показать учителю их решения:

3х2 -10х +1=0 0,5х2+2х - 4=0 4х2 + х - 6=0

2х2 + 3х +8=0 х2 +4 =0 5х2 -8х = 0

1,5х2-0,6х – 4,8 = 0 -2х2+4х – 8 = 0 9х2+4х  -7 = 0

Домашнее задание:

Напишите программу проверки пароля. Пусть пароль – некоторое число, зафиксированное в программе. Программа печатает приглашение «введите пароль» и вводит число. Если введённое число совпадает с фиксированным паролем, то программа выводит приветствие, если нет – сообщает о том, что пароль не угадан.