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

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

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