Содержание
-
Решение задач на ветвление.
-
Пример задачи
Присвойте величине а значение наибольшего из трех заданных чисел. Математическая запись: Дано: 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); readln end. Дано: 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
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.