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


Подписи к слайдам:
Условный оператор

Условный оператор

  • Учитель информатики
  • СШ №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. Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями.

Подведение итогов

  • Как записывается оператор ветвления в Паскале?
  • Что представляет собой полное ветвление(неполное) в Паскале?