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

УрокУсловный оператор
Цель урока: Показать сходство и различие условного оператора в языках программирования QBasic и Turbo Pascal 7.0.План урока:Проверка домашнего задания.Условный оператор.Оператор варианта. Домашнее задание. Ход урока1. Проверка домашнего задания.Вопросы.Как записывается оператор вывода?Как записывается оператор ввода?Как записывается оператор присвоения?Чем заканчивается программа?Какая функция используется при записи вы­ражения y=х2+3х—7 на языках QBasic и Turbo Pascal 7.0?Записать на языках QBasic и Turbo Pascal 7.0 следующие вы­ражения: у = 5х5 - 10х + 2; z = 14х4-5x3+11х-17.Какие операции можно применять к переменным целого типа? Условный операторУсловные операторы в QBasic и Turbo Pascal 7.0 помогают нам осуществить "ветвление" программы, т.е. передать управление по условию.Условный оператор имеет вид: IF условие THEN <операторы1> [ELSE <операторы2]> Выполнение условного оператора начинается с вычисления значения логического выражения, записанного в условии. Простые условия записываются в виде равенств или неравенств. Сложные условия составляют из простых с помощью логических операций. Если условие истинно, то выполняется <операторы1>, в противном случае -<операторы2>.



Даны два числа А и В. Найти наибольшее из них. Program 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.






Если после THEN или после ELSE располагается целая группа операторов, то можно использовать IF блок, который имеет следующую структуру:IF условие THEN ОператорыELSE операторы END IFВ Turbo Pascal 7.0, если в качестве оператора должна выполниться серия операторов, то они объединяются в операторные скобки Begin-End




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

Program prim2; var N:integer; Вводим целое число N. begin writeln(‘n=’); readln(n); 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(' плохо...'); Можно ли заменить его следующими операторами: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.