8 класс. Конспекты уроков. Нелинейные операторы
план-конспект урока по информатике и икт (8 класс) по теме

1. 8 Класс. Конспект уроков №№ 3, 4, 5

ОПЕРАТОР УСЛОВНОГО  ПЕРЕХОДА (ВЕТВЛЕНИЕ)

Неполная форма:  

IF условие THEN оператор;

УСЛОВИЕ   - это логическое выражение, принимающее значение истина или ложь.

если условие истинно, то выполняется оператор,

иначе выполняется следующая за IF..THEN инструкция.

Полная форма :    

IF условие THEN оператор1 ELSE оператор2;

Если условие истинно , то выполняется оператор1, иначе выполняется оператор2.

В Н И М А Н И Е!  Перед словом ELSE точка с запятой не ставится!!

ЗАДАНИЕ.

Найти большее из двух целых чисел а и b.

Program Bid;

Uses crt;

  var a,b,max: integer;

Begin

  write('  Введите целое число а='); readln(a);

  write('  Введите целое число b='); readln(b);

  if a>=b then max:=a        { если условие =true, то max:=а  }

              else   max:=b;       { если условие =false, то max:=b }

  writeln('Max=',max);

End.

1. З А Д А Н И Е:

Найти наибольшее из трех чисел.

Program Bid;

Uses crt;

  var a, b, c, max: integer;

Begin

  writeln('  Введите целые числа а, b, c ');

   readln(a,b,c);

  if a>=b then max:=a  else   max:=b; 

   if c>=max then max:=c; 

  writeln('Max=',max);

End.

СЛОЖНОЕ УСЛОВИЕ

При сложных условиях применяются логические связки:

And        - истинно, когда истинны все составляющие логические выражение

        Пример: ((x>=0) and (x<=5)) истинно для x из интервала [0;5] и ложно при x=6

Not        - истинно, когда ложно исходное логическое выражение

        Пример: not(x>=0) истинно для x=-5 и ложно для x=6

Or        - истинно, когда истинно хотя бы одно из логических выражений

Например: ((a<5) or (a>9)) истинно для a=2 и ложно для a=6

ЗАДАНИЕ:

                          при x<0

Вычислить: Y=                

                          при x 0

Program Primer; Uses crt;

  var x: integer;

Begin

   write('Введите значение x='); readln(x);

  if x<0 then write(' Y1=',1/(x-1))

            else   write(' Y1 - не существует по условию');

  if (x>=0) and (x<>5) then write(' Y2=',1/(x-5))

                                     else  write(' Y2 - не существует по условию');

End.

ПРАКТИЧЕСКАЯ РАБОТА

1. Набрать программу и проверить ее работу для Х: -2, 1, 5, 6.

2. Эту же задачу решить для условия:

   1)  Х<0 или Х=5 или Х=8

   2)  Х>=0 и Х<>5 и Х<>6

   Проверить работу программы для Х: -2,  0,  2,  5,  6,  8,  9.

3. Эту же задачу решить для условия:         1)  -2<=Х<=5    Х<>1 ,

2)  -1<=Х<=8    Х<>5

Проверить все контрольные точки: -3,  -2,  -1,  0,  1,  5,  8,  9.

ОПЕРАТОРНЫЕ СКОБКИ

Если требуется после THEN или ELSE применить более одного оператора, то применяются  

ОПЕРАТОРНЫЕ СКОБКИ  BEGIN..END

ЗАДАНИЕ

Решить  квадратное уравнение  

Program Kwur;

Uses crt;

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

Begin

  write('Введите коэффициенты a,b,c :'); readln(a,b,c);

  d:=b*b-4*a*c;

  if d<0 then writeln('Нет корней.')

            else begin

                     if d=0 then begin

                                         x1:=-b/(2*a);

                                         x2:=x1

                                       end

                               else begin

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

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

                                      end;

                    write('    x1=', x1:5:2,'     x2=',x2:5:2)

                  end;

End.

ПРАКТИЧЕСКАЯ РАБОТА

Решить  уравнения:

      а)  3х²  +  6х - 8 = 0

      б)   х²  -  2х - 1 = 0

      в)  5х²  -  4х + 3 = 0

      г)  4х²  +  4х - 1 = 0

      д)  5х²  -  5х + 2 = 0

Материал для конспектов взят из учебника PASCAL. Практикум / Чернов Н. А., Мамелина С. В., Новосельцев С. В. - Кострома, 2009