Компьютерная презентация "Условный оператор в Pascal"

• 1 слайд

  Разветвляющиеся программы Условный оператор IF или как компьютер делает выбор

• 2 слайд

  Задача 1. Компьютер должен перемножить два числа - 167 и 121. Если их произведение превышает 20000, то компьютер должен напечатать текст ПРОИЗВЕДЕНИЕ БОЛЬШОЕ, иначе текст ПРОИЗВЕДЕНИЕ МАЛЕНЬКОЕ. После этого компьютер в любом случае должен напечатать само произведение.

• 3 слайд

  Задача 2. В компьютер вводятся два произвольных целых числа - длины сторон двух кубиков. Компьютер должен подсчитать объем одного кубика - большего по размеру . Обозначим a1 - сторону одного кубика, a2 - сторону другого, bol - сторону большего кубика, V - объем кубика. Приведем три варианта программы:   ВАРИАНТ 1   VARa1,a2 :integer; BEGIN ReadLn(a1,a2); ifa1>a2thenWriteLn(a1*a1*a1) elseWriteLn(a2*a2*a2) END.

• 4 слайд

  ВАРИАНТ 2   VARa1,a2,V:integer; BEGIN ReadLn(a1,a2); ifa1>a2thenV:=a1*a1*a1 elseV:=a2*a2*a2; WriteLn(V) END. ВАРИАНТ 3   VARa1,a2,bol,V :integer; BEGIN ReadLn(a1,a2); ifa1>a2thenbol:=a1 elsebol:=a2; V:=bol*bol*bol; WriteLn(V) END.

• 5 слайд

  Оператор if можно записывать и без части else: IF условие THEN оператор Для примера рассмотрим задачу: В компьютер вводится слово. Компьютер должен просто распечатать его. Однако, если введенным словом будет “школа", то компьютер должен напечатать вместо него слово «лицей». VAR Slovo : String; BEGIN ReadLn (Slovo); if Slovo = ‘школа' then Slovo := ‘лицей'; WriteLn (Slovo) END.

• 6 слайд

  Правила записи оператора IF IF условие THEN оператор ELSE оператор Полезное замечание: Вычисляя выражения, стоящие в условии оператора if, Паскаль не записывает их значения в память. Например, после выполнения фрагмента - b:=6; if b+1>0 then s:=20 - в ячейке b будет храниться 6, а не 7. То же относится и к выражениям из оператора WriteLn. Например: b:=6; WriteLn (b+1) . И здесь тоже в ячейке b останется храниться 6, а не 7. И вообще, информация в ячейках памяти не меняется при вычислении выражений. знак сравнения знаков сравнения шесть: > больше>=больше или равно=равно < меньше<=меньше или равно<>не равно

• 7 слайд

  ФРАГМЕНТ ПРОГРАММЫ ЧТО НА ЭКРАНЕ a:=10;ifa>2thenWriteLn ('!!!')elseWriteLn ('!') !!! a:=4;ifa>5thena:=a+10elsea:=a-1;WriteLn (a) 3 s:=6;ifs-8<0thens:=s+10;WriteLn (s) 16 s:=6;ifs<0thens:=s+10; s:=s+1; WriteLn (s) 7