Условный оператор в языке программирования Pascal

Содержание

Слайд 2

Успеет ли спортсмен преодолеть расстояние в Sкм, если А часов он ехал

Успеет ли спортсмен преодолеть расстояние в Sкм, если А часов он ехал
на велосипеде со скоростью V1 км/ч, В часов шел пешком со скоростью V2 км/ч.

IF A*V1+B*V2>=S
THEN WRITELN (‘УСПЕЕТ’)
ELSE WRITELN (‘НЕ УСПЕЕТ’)

;

Проверка домашнего задания

Слайд 3

Найдите значение числа А

6

Найдите значение числа А 6

Слайд 4

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

IF

THEN

ELSE

<УСЛОВИЕ>

<КОМАНДА 1>

<КОМАНДА

Расположите элементы условного оператора в правильном порядке IF THEN ELSE ;
2>

;

Слайд 5

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

11 и 45


A:=11;
B:=

Дан фрагмент программы, найдите значение переменных А и В 11 и 45
34;
IF A>B THEN A:=A*B
ELSE B:=B+A;

Слайд 6

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

8 и 8


A:=70;
B:=

Дан фрагмент программы, найдите значение переменных А и В 8 и 8
8;
IF A>B THEN A:=A DIV B
ELSE B:=A MOD B;

Слайд 7

Выяснить, является ли
некоторое число решением системы

Выяснить, является ли некоторое число решением системы

Слайд 8

Выяснить, является ли
некоторое число решением системы

X>2 X<10

И

AND

Выяснить, является ли некоторое число решением системы X>2 X И AND

Слайд 9

AND

Выяснить, является ли
некоторое число решением системы

IF (X>2) (X<10)

AND Выяснить, является ли некоторое число решением системы IF (X>2) (X

Слайд 10

НЕТ

ДА

Начало

ВВОД Х

ЕСЛИ (Х>2) И (Х<10)

ВЫВОД «Является решением»

ВЫВОД «Не является решением»

Конец

НЕТ ДА Начало ВВОД Х ЕСЛИ (Х>2) И (Х ВЫВОД «Является решением»

Слайд 11

PROGRAM pr1;
VAR X:BYTE;
BEGIN
WRITELN (‘Введите число’);
READLN (X);
IF (X>2) AND (X<10)

PROGRAM pr1; VAR X:BYTE; BEGIN WRITELN (‘Введите число’); READLN (X); IF (X>2)

THEN WRITELN (‘Число является решением’)
ELSE WRITELN (‘Число не является решением’);
END.

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

Слайд 12

Тестирование программы

Тестирование программы

Слайд 13

Выяснить, принадлежит ли некоторое число заштрихованной области

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

Выяснить, принадлежит ли некоторое число заштрихованной области Самостоятельная работа