Презентация "Условный оператор в языке программирования PASCAL" 9 класс

Подписи к слайдам:
S:=A*A; S:=A*A;

VAR A,S:INTEGER;

BEGIN

WRITELN (‘Введите число’);

READLN (A);

END.

PROGRAM PRIM;

WRITELN (‘S=’, S);

Задача
  • Составить программу, которая будет запрашивать возраст Маши, возраст Саши и выводит на экран фразу «Маша старше Саши» или «Саша старше Маши» (предполагаем, что кто-нибудь из них обязательно старше)

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

в языке

программирования

PASCAL

Учитель информатики и ИКТ МБОУ «СОШ №14»

г.Находка, Приморского края

Бурдастых Л.М.

Условный оператор помогает нам осуществить «ветвление» программы, т.е. передать управление по условию. Условный оператор помогает нам осуществить «ветвление» программы, т.е. передать управление по условию. Условный оператор имеет вид : IF условие THEN <операторы1> ELSE <операторы 2> Если условие истинно, то выполняется <операторы1>, в противном случае -<операторы 2>. Полное ветвление

Z:= X

Z:= Y

X>Y

Z:= X

X>Y

Неполное ветвление

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

IF условие THEN <операторы1>

НАЧАЛО

Введите возраст Маши и Саши

Маша старше Саши?

КОНЕЦ

ДА

НЕТ

Маша старше Саши

Саша старше Маши

PROGRAM VOZRACT;

VAR S,M : INTEGER;

BEGIN

WRITELN (‘Введите возраст Саши’);

READLN (S);

WRITELN (‘Введите возраст Маши’);

READLN (M);

IF S > M

THEN WRITELN (‘Саша старше Маши’)

ELSE WRITELN (‘Маша старше Саши’);

END.

Программа на языке программирования Pascal

Дан фрагмент программы, найдите значение переменных X и Y

21 и 53

X:=21;

Y:= 32;

IF X>Y THEN X:=X*Y

ELSE Y:=Y+X;

Вычислить значение функции

If x >3 then y:=x*x+5 else y:=x - 8;

Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры интервалу (0;5)

Выяснить, принадлежит ли

некоторое число промежутку (0;5)

X>0 X<5

И

AND

AND

IF (X>0) (X<5)

Выяснить, принадлежит ли

некоторое число промежутку (0;5)

НЕТ

ДА

Начало

ВВОД Х

ЕСЛИ (Х>0) И (Х<5)

ВЫВОД «Принадлежит промежутку»

ВЫВОД «Не принадлежит промежутку»

Конец

PROGRAM FUNCZIY;

VAR X:INTEGER;

BEGIN

WRITELN (‘Введите число’);

READLN (X);

IF (X>0) AND (X<5)

THEN WRITELN (‘Число принадлежит промежутку’)

ELSE WRITELN (‘Число не принадлежит промежутку’);

END.

Программа на языке программирования Pascal

Запишите условный оператор , в котором значение переменной вычисляется по формуле: a+b, если а- нечетное и a*b если а- четное

Самостоятельная работа

Расположите элементы условного оператора

в правильном порядке

IF

THEN

ELSE

<УСЛОВИЕ>

<КОМАНДА 1>

<КОМАНДА 2>

;

Домашнее задание Здание (на оценку «3»)Какими будут значения переменных j ,k после выполнения условного оператора If j>k then j:=k-2 else k:=k-2; если j=3, k=5; Здание (на оценку «4») Дано трехзначное число. Напишите программу определения, является ли оно полидромом («перевертышем») Здание (на оценку «5»)Найти наибольшее из трех данных чисел. Спасибо за урок! Спасибо за урок!