Презентация "Условный оператор"

Подписи к слайдам:
Условный оператор
  • Учитель информатики
  • СШ №114 Сайрам
  • Ташходжаев Султанмурат Акмалович
Тест «Язык Pascal» Вопросы
  • Перечислить типы данных.
  • Назовите оператор ввода данных.
  • Назовите оператор вывода данных.
  • Как выглядит оператор присваивания?
  • Ответы:
  • INTEGER, LONGINT, REAL
  • READLN();
  • WRITELN();
  • :=
Тема урока: «Условный оператор» Цели урока:
  • научить учащихся решать задачи с использованием условного оператора в Паскаль;
  • ввести понятие условного оператора.
Общий вид оператора
  • Полная форма записи оператора
  • IF <условие> THEN <оператор1> ELSE <оператор2>;
  • Краткая форма записи оператора:
  • IF <условие> THEN <оператор>;
Написать программу решения следующей задачи: Даны два числа не равные друг другу. Найти наибольшее из них и увеличить на 2.
  • program priumer;
  • var a,b,max: integer;
  • begin
  • writeln(‘Введите a,b’);
  • readln(a,b);
  • writeln(max);
  • end.
  • if
  • a>b
  • then
  • max:=a+2
  • else
  • max:=b+2;
Практическая работа на ПК
    • Дано действительное число. Возвести его в квадрат, если оно неотрицательно и в четвертую степень, если отрицательно.
Решение
  • program primer;
  • var a,b: integer;
  • begin
  • writeln(‘Введите a’);
  • readln(a);
  • If a>0 then b:=a*a else b:=a*a*a*a;
  • writeln(b);
  • end.
Вычислить значение функции
  • program primer;
  • var x,y: integer;
  • begin
  • writeln(‘Введите x’);
  • readln(x);
  • If x<=3 then y:=x-8 else y:=x*x+5;
  • writeln(y);
  • end.
Домашнее задание
  • Даны целые числа m, n. Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями.
Подведение итогов
  • Как записывается оператор ветвления в Паскале?
  • Что представляет собой полное ветвление(неполное) в Паскале?