Презентация, доклад по информатике на тему: Условный оператор

QBasic и Turbo Pascal 7.0.

План урока:
Проверка домашнего задания.
Условный оператор.
Оператор варианта.
Домашнее задание.

записывается оператор присвоения?
Чем заканчивается программа?
Какая функция используется при записи вы­ражения y=х2+3х—7 на языках QBasic и Turbo Pascal 7.0?
Записать на языках QBasic и Turbo Pascal 7.0 следующие вы­ражения:
у = 5х5 - 10х + 2;
z = 14х4-5x3+11х-17.
Какие операции можно применять к переменным целого типа?

нам осуществить "ветвление" программы, т.е. передать управление по условию.
Условный оператор имеет вид:
IF условие THEN <операторы1> [ELSE <операторы2]>

Выполнение условного оператора начинается с вычисления значения логического выражения, записанного в условии. Простые условия записываются в виде равенств или неравенств. Сложные условия составляют из простых с помощью логических операций.
Если условие истинно, то выполняется <операторы1>, в противном случае -<операторы2>.

prim1; uses crt;
Описываем переменные А и В как целые
Var a,b: integer;
Begin
Clrscr;
Вводим два целых числа
Write('введume 2числа'); Readln(a,b);
Если A>B, то выводим на экран А, иначе В.
If a>b Then Writeln(a) Else
Writeln(b);

End.

можно использовать
IF блок, который имеет следующую структуру:
IF условие THEN
Операторы
ELSE операторы
END IF

В Turbo Pascal 7.0, если в качестве оператора должна выполниться серия операторов, то они объединяются в
операторные скобки
Begin-End

целесообразно использовать условный оператор
SELECT ... END SELECT. Case переменная Of
Если выражение выбора отвечает условиям списка выражений данного блока CASE, выполняются операторы из этого блока.

n of
Если N<=0, то выводим текст “<=0”-
CASE IS<=0: ?"<=0” -32768..0: writeln(‘<=0’);
Если N находиться в пределах от 2 до 9, то выводим текст “2-9”
2..9: writeln(‘2-9’);
Если N=1 или N=10, то выводим текст “1,10”
1,10 : writeln(‘1,10’);
else
Иначе выводим текст “>10”
writeln(‘>10’)
Окончание ветвления.
end;
Окончание программы.
End.

плохо...');
Можно ли заменить его следующими операторами:
if D=10 Then Writeln('ypa!') Else Writeln('nлoxo...');
if Not(D=W) Then Writeln('ypa!') Else Writeln('nлoxo...');
if Not(D=10) Then Writeln('плоxo...') Else Writeln('ypa!');
if Not(D<>10) Then Writeln('nлoxo...') Else Writeln('ypa!').

Какими будут значения переменных j, k после выполнения условного оператора:
if j>k Then j = k-2 Else k=k-2 if j>k Then j:=k - 2 Else dec(k,2);
если исходные значения переменных равны:
j=3,k=5;
j=3,k=3;
j=3,k=2.