Презентация на тему: Решение задач на ветвление

Решение задач на ветвление.

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

Текст программы: 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); readlnend.Дано:a, b, c – целые числа.Присвоить а – наибольшее значение.Решение:Если a>b, то а:=а, иначе а:=b;Если a>с, то а:=а, иначе а:=с.

Задача Даны числа х и у. Вычислите число z, равное х+у, если х

Текст программы: program summa; var x,y:integer; z:real;begin write ('vvedite dva chisla'); readln (x,y); if xу, z может быть отрицательным числом.Решение:Если х

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