Презентация на тему Условные конструкции

1
Серия 2
да
нет
Условие
Серия 1
да
нет
if … then… else…

if … then…

Определить, существует ли такой треугольник.

сумма его цифр четным числом.

– «любит – не любит», взяв за исходное данное

количество лепестков N.

меры в градусную или наоборот. Программа должна запрашивать, какой

перевод нужно осуществить, и выполнять указанное действие.

нескольких простых, соединенных связками OR, AND, NOT.
Пример:
If (a

(b
If (N mod 2=0) and (N div 10<>0) and (N div 100 = 0) then writeln (N,‘ - чётное двузначное число’)

операторов, то используются операторные скобки begin… end

If a

begin min:=a; max:=b end else begin min:=b; max:=a end;

соединение параллельное и любое другое число, если соединение последовательное
нач
кон
R

в заштрихованную область

«задумывает» случайное целое число от 1 до 10, а

ученик пытается его отгадать. По ходу угадывания компьютер делает подсказки «много» или «мало».

задачи

begin
clrscr;
randomize;
y:=random(11);
a1: readln (x);
if x=y then

writeln ('ugadano')
else
begin
if x goto a1;
end;
end.

Программа «Угадай-ка»

readln (x); k:=k+1;
if x=y then

writeln ('ugadano s ', k, ' popytki')
else
begin
if x goto a1;
end;
end.

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

числом

Определить, является ли треугольник со сторонами a, b, c

равнобедренным

Заданы размеры A, B прямоугольного отверстия и размеры X, Y, Z кирпича. Определить, пройдет ли кирпич через отверстие.

– от 1 до 31, месяц – от 1

до 12). Если введены некорректные данные, то сообщить об этом.


5. Услуги телефонной сети оплачиваются по правилу: за разговоры до A мин в месяц оплачиваются B р., а разговоры сверх установленной нормы оплачиваются из расчета C р. в минуту. Написать программу, вычисляющую плату за пользование телефоном для введенного времени разговоров за месяц.