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

Слайд 1

Слайд 2

Пример задачи Присвойте величине а значение наибольшего из трех заданных чисел. Математическая запись: Дано: a, b, c – целые числа. Присвоить а – наибольшее значение. Решение: Если a>b , то а=а, иначе а= b; Если a> с, то а=а, иначе а=с.

Слайд 3

Текст программы: program naibolsh; var a,b,c :integer; begin write ('vvedite tri chisla'); readln ( a,b,c ); if a>b then a:=a else a:=b ; if a>c then a:=a else a:=c ; write ('naibolshee=' , a ); readln end. Дано: a, b, c – целые числа. Присвоить а – наибольшее значение. Решение: Если a>b , то а:=а , иначе а:= b ; Если a> с , то а:=а , иначе а:=с .

Слайд 4

Задача Даны числа х и у. Вычислите число z , равное х+у, если х <= у и 1-х+у в противном случае. Решение: Если х < =у, то z =х+у, иначе z =1-х+у.

Слайд 5

Текст программы: program summa; var x,y :integer; z :real; begin write ('vvedite dva chisla'); readln ( x,y ); if x<=y then z:=x+y else z:=1-x+y ; write ( 'z=',z:3:4 ); readln end. z – real , так как при х > у, z может быть отрицательным числом. Решение: Если х < =у, то z :=х+у, иначе z :=1-х+у .

Слайд 6

Задачи: Проверьте, есть ли среди трех заданных чисел равные. Даны два действительных числа. Меньшее из них замените полусуммой этих чисел, а большее – их произведением. Даны три числа a, b и c . Выясните, верно ли a