Решение задач, содержащих ветвление
презентация к уроку по информатике и икт (9 класс)

Слайд 1

Слайд 2

Оператор условного перехода IF УСЛОВИЕ THEN Д1 ELSE Д2 ЕСЛИ ТО ИНАЧЕ УСЛОВИЕ Д1 Д2 ДА НЕТ

Слайд 3

Вложенный оператор ветвления УСЛОВИЕ 1 Д1 УСЛОВИЕ 2 Д2 Д3 IF УСЛОВИЕ 1 THEN Д1 ELSE IF УСЛОВИЕ 2 THEN Д2 ELSE Д3 ДА НЕТ НЕТ ДА

Слайд 4

Задача 1 Вычислить значение переменной y . m +1 , где m<>0 Y = 3+m , где m=0 y:=m+1 ДА m<>0 y:=3+m НЕТ Ввести m Вывод y конец начало Program func1; Var m,y:real; Begin Writeln (‘ введите значение m’); Readln (m); If m<>0 then y:=m+1 else y:=3+m; Writeln (‘ значение y = ’,y); end .

Слайд 5

Задача 2 Вычислить значение переменной y . m +1 , где m>0 Y = 3+m , где m=0 2 – m , где m<0 ДА m>0 y:=m+1 m=0 y:=3+m y:=2-m ДА НЕТ НЕТ Ввести m Вывод y конец начало Program func2; Var m,y:integer; Begin Writeln (‘ введите значение m’); Readln (m); If m>0 then y:=m+1 else if m=0 then y:=3+m else y:=2-m; Writeln (‘ значение y = ’,y); end .

Слайд 6

Задача 3 Вычислите значение переменной K . 3n+m, если m>0 K= 2m , если m<0 n+m, если m=0; где n=12