Оператор ветвления

ветвления, записанная на конкретном языке программирования. В языке Паскаль конструкция

ветвления записывается следующим образом:
If <логическое выражение> then
<команда1>
else
<команда2>;

значений: истина или ложь.
Простое условие строится с использованием знаков

сравнения: <, >, =, >=, <=, < >.
Сравнивать можно константы, переменные, арифметические выражения.

в зависимости от истинности логического выражения.
Если по условию задачи

таких команд должно быть несколько, то их нужно «взять в операторные скобки». Роль таких скобок играет конструкция begin end. Слово begin играет роль открытой скобки, а слово end – закрытой.
Конструкцию begin end вместе с командами, расположенными между ними называют составной оператор.

and (и),
or (или),
xor (исключающее или).

трехзначного числа
Вычисление значения функции
Определение принадлежности точки заданной области

число x положительным или нет. Выдать на экран соответствующее сообщение.

результатов: сообщение, зависящее от значения x.
Алгоритм решения задачи.
Ввод исходных данных
Результат

будет зависеть от того, истинным или ложным является значение логического выражения x>0. Для решения воспользуемся условным оператором.
Вывод результата.
Описание переменных:
Переменная x – integer (или real, для данной задачи это не имеет значения).

0 then
Write('Число положительное')
else
Write('Число не

положительное');
end.

ли заменить логическое выражение в условном операторе так, чтобы сообщения

’Число положительное’ и ’Число не положительное’ пришлось поменять местами? Как это сделать?
* Какие изменения нужно внести в программу, чтобы рассматривались три случая: ’Число положительное’, ’Число отрицательное’, ’Число равно нулю’.

которая нарисует на экране зеленый прямоугольник, если число четное, а

если нечетное, то красный круг.

рисунок, зависящий от значения x.
Алгоритм решения задачи.
Ввод исходных данных
Результат будет

зависеть от того, истинным или ложным является значение логического выражения x mod 2=0. Для решения воспользуемся условным оператором.
Вывод результата.
Описание переменных:
Переменная x – integer.

mod 2=0 then
begin
setBrushColor(clGreen);
rectangle(150,150,450,350);
end
else

begin
setBrushColor(clRed);
circle(400,300,100);
end;
end.

число трехзначным, и, если да, то выведет четные цифры числа.

a1, a2, a3, в том случае если они четные или

сообщение, что четных цифр нет.

число больше 99 и меньше 1000.
Если число трехзначное, то выделяем

цифры числа и проверяем каждую из них на четность.
Для выделения первой цифры (переменная a1) трехзначного числа необходимо найти целую часть от деления числа на 100.
Для выделения второй цифры (переменная a2) трехзначного числа необходимо найти остаток от деления числа на 100 и от него найти целую часть при делении на 10.
Для определения последней цифры (переменная a3) трехзначного числа необходимо найти остаток от деления числа на 10.
Для проверки цифры на четность нужно проверить, равен ли нулю остаток от деления цифры на 2.
Вывод результата.

100;
a2:=a mod 100 div 10;
a3:=a mod 10;
if a1 mod 2=0

then
Writeln('цифра ',a1,' четная');
if a2 mod 2=0 then
Writeln('цифра ',a2,' четная');
if a3 mod 2=0 then
Writeln('цифра ',a3, ' четная');
If (a1 mod 2=1) and (a2 mod 2=1) and (a3 mod 2=1) then
Writeln('в числе нет четных цифр');
End
Else
Writeln('число не является трехзначным');
End.

Предложите свои тесты на эти случаи.
Как по-другому можно вычислить значение

второй цифры трехзначного числа?

переменная f - значение функции.

вычисление значения функции, в зависимости от значения аргумента
Вывод результата.
Описание переменных:
Все

переменные, определенные для решения задачи, имеют тип real.

вычисления значения функции. Сколько строк нужно добавить в таблицу?
*Для заданной

функции и фрагмента программы, вычисляющей значение этой функции, вставьте пропущенное

*Запишите функцию, значение которой вычисляется с помощью предложенного фрагмента программы.
If x< –3 then
y:=-x
else
if x<0 then
y:=0
else
y:=x*x;

Вопросы

данной области. Ответом должно служить слово "да" или "нет".

точки.
Результат
слово "да" или "нет", в зависимости от принадлежности

точки закрашенной области .

x, y = -x, y = a.
Точка принадлежит области,

если одновременно выполняются три условия: y ≥ x, y ≥ -x, y ≤ a.
Для того, что бы определить, какой из знаков поставить, достаточно взять произвольную точку, принадлежащую области и посмотреть как будут выполняться условия для этой точки.
Например, при a = 5, точка с координатами (1,3) принадлежит области, и выполняются следующие условия 3 ≥ 1, 3 ≥ -1, 3 ≤ 5.
Вывод результата..

y=');
Readln(y);
Write('введите значения a=');
Readln(a);
If (y>=x) and (y>=-x) and (y

точки относительно области.
Проверьте точки, лежащие на границе области. Какой

ответ выдает программа? Какие изменения нужно внести в программу, если считать, что точки, лежащие на границе, не принадлежат области?
Как изменится условие принадлежности точки области, если областью считать все плоскость, за исключением рассмотренного «треугольника».