Презентация по информатике на тему Оператор условия в Паскале (7-9 кл) 
Оператор условия
 Форма организации действий, при которой в зависимости от выполнения некоторого условия совершается одна или другая последовательность действий, называется ВЕТВЛЕНИЕМ 
Виды ветвления (условия)1. ЕСЛИ  у меня будет 50 грн ТО вечером я пойду в кино, 	А ИНАЧЕ останусь дома2. ЕСЛИ  у меня будет 50 грн ТО вечером я пойду в кино
Полный оператор условияоператор 1условиеоператор 2НетДаначаловвод исходных данныхвывод результатовконецIF  условие Then оператор1 ELSE оператор2;
ПримерЕСЛИ  у меня будет 50 грн ТО вечером я пойду в кино, А ИНАЧЕ останусь домав киноS=50домаНетДаначалоВвод суммы денег SконецIf s=50 then write(‘иду в кино’)  else write(‘останусь дома’);
Неполный оператор условияоператор 1условиеНетДаначаловвод исходных данныхвывод результатовконецIF  условие Then оператор1;
ПримерЕСЛИ  у меня будет 50 грн ТО вечером я пойду в киноИду в киноS=50НетДаначаловвод суммы SконецIF S=50 THEN WRITE(‘иду в кино’);
УСЛОВИЯ делятся на:1. Простые условия2. Сложные условия
Операции сравнения:>  	Больше				x>5<		меньше				d<0>=	больше или равно		x+s>=0.2<=	меньше или равно		q<=sin(x)=		равно				x=0< >	не равно				cos(x-y)<>1
Логические Операции :AND  	И			(x>5) and (x<10)OR		ИЛИ		(d<0) or (d=1)Простые условия  в составе сложного БЕРУТСЯ в скобки!!!
Заданиезапишите следующие  условияЧисло а не равняется нулю.			Сумма чисел x и y больше квадрата числа z.	t неотрицательное число.				A<>0(X+Y)>Z*ZT>=0
Заданиезапишите следующие  условия3<x<5X>3 и x<5(x>3) and  (x<5)35x35xX<3X>5(x<3) or  (x>5)
Алгоритм нахождения наибольшего из двух чиселПрограмма:Program a1;Var  a, b, max : integer ;BeginReadln(a,b);IF a>b THEN max:=a ELSE max:=b;Writeln(‘max=’ , max);End.Max:=AA>BMax:=BНетДаначалоВвод  A,  BконецВывод  max
Решение задач на нахождение наибольшегоРис расфасован в два пакета. Вес первого -  m кг, второго – n кг. Составьте программу, определяющую: какой пакет тяжелее – первый или второй? Program z1;Var m, n : integer;BeginWrite(‘вес первого мешка равен  ’);  readln(m);Write(‘вес второго мешка равен  ’);  readln(n);If m>n then write(‘первый пакет тяжелее’) else write(‘второй пакет тяжелее’);End.Тяжелее первыйM>nТяжелее второйНетДаначалоВвод  m, nконец
Решение задач на нахождение наибольшегоВера больше на b-cB>CВаля большена с-bНетДаначалоВвод  A, BконецProgram z2;Var a, b, c : integer;BeginWrite(‘вес собранной клубники равен  ’); readln(а);Write(‘вес собранной клубники Верой  равен  ’);  readln(b);C:= a-b;If  b>c  then write(‘больше клубники собрала Вера на  ’ , b-c , ‘кг’) else write(‘больше клубники собрала Валя  на  ’ , c-b , ‘кг’);End. C:=A-BВаля и Вера на своем садовом участке собрали А кг клубники. Из них В кг собрала Вера. Кто из девочек собрал клубники больше и на сколько?