Виды алгоритмических структур Линейный алгоритм Разветвляющийся алгоритм Циклический алгоритм ?

Разветвляющиеся алгоритмические конструкции. Условный оператор IF

Формы ветвления Условие Действие 1Действие 2 Да Нет Условие Действие Да Нет Неполная форма Полная форма

Полное ветвление Начало Ввод A A>0 X:=sqr(a) X:=abs(a) Вывод X Конец ДаНет Begin Writeln ( Введите число); Readln(A); If A>0 Then X:=sqr(A) Else X:=abs(A); WriteLn (X); End. ? Сформулируйте условие задачи

Правила построения полного оператора IF If логическое выражение Then Оператор 1 Else Оператор 2 ; Перед ELSE ; не ставиться!

Неполное ветвление Begin Writeln ( Введите число); Readln(A); If A>0 Then A:=sqrt(A); WriteLn (A); End. A>0 A:= sqrt(A) Да Нет Ввод A Вывод A ? Сформулируйте условие задачи

Правила построения неполного оператора IF If логическое выражение Then Оператор 1 ;

Операции отношений 56 - х/2 > x-100*(x-3) (56 - х/2) > (x-100*(x-3))

С клавиатуры вводятся два различных числа. Если первое число больше второго, то на экран выводится их сумма. В противном случае – произведение. Program Chisla; Uses CRT; Var a,b : integer; Begin ClrScr; Writeln (Введите два различных числа); Readln(a,b); If a>b Then Writeln (Сумма чисел:, a+b) Else Writeln (Произведение чисел:, a*b); End.

Практическая работа: 1.С клавиатуры вводится число отличное от нуля. Определить четное оно или нет. 2.С клавиатуры вводится четырехзначный номер билета. Определить является ли он счастливым.

Практическая работа: 1.С клавиатуры вводится число, отличное от нуля. Определить четное оно или нет. If A mod 2 = 0 Then WriteLn (Число четное) Else WriteLn (Число нечетное);

Практическая работа: 2. С клавиатуры вводится четырехзначный номер билета. Определить является ли он счастливым. If (x1+x2)=(x3+x4) Then WriteLn (счастливый) Else WriteLn (несчастливый); 4536 x1 x2 x3 x4