Условные конструкции

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

Условие

Серия 1

Серия 2

да

нет

Условие

Серия 1

да

нет

if … then…

Примеры задач:
1. Даны два угла треугольника (в градусах). Определить, существует ли

2. Дано трехзначное число N. Проверить, будет ли сумма его цифр

3. Составить программу, определяющую результат гадания на ромашке – «любит –

4. Составить программу, осуществляющую перевод величин из радианной меры в градусную

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

Если после ключевых слов then, else выполняется серия операторов, то используются

№1. Напишите программу

Ввод B

B>10

B:=2*B

B:=B+1

да

нет

нач

кон

B

№2

Ввод R1, R2, R3

K=1

R:=

R=R1+R2+R3

да

нет

Ввод K

Введите «1», если соединение параллельное и

№3

X

Y

-2

2

X

X2+Y2=22

Y=-X

X=-2

Определите условие попадания точки с координатами (x, y) в заштрихованную область

№4. Напишите программу для создания игры «Угадай-ка». Компьютер «задумывает» случайное целое

нач

Y – cлуч число

Ввод X

кон

да

да

нет

нет

Завершите блок-схему для этой задачи

нач

Y – cлуч число

Ввод X

X=Y

«Мало»

X

кон

«Угадано»

«Много»

да

да

нет

нет

program ugadaika;
uses crt;
var x, y: integer;
label a1;
begin
clrscr;
randomize;
y:=random(11);
a1: readln (x);
if x=y

program ugadaika;
uses crt;
var x, y, k: integer;
label a1;
begin
clrscr;
randomize;
k:=0;
y:=random(11);
a1: readln (x); k:=k+1;
if

Задачи:
Определить, является ли целое число N четным двузначным числом
Определить, является ли

4. Определить правильность даты, введённой с клавиатуры (число – от 1

6. Решить квадратное уравнение вида ax2+bx+c=0