Упражнения. 1. Составить программы для решения следующих задач:

1. Составить программы для решения следующих задач:

а) Даны три числа x, y, z. Вывести те из них, которые принадлежат заданному отрезку [a,b].

б) Дана точка с координатами (x,y). Определить, принадлежит ли точка кольцу, с заданными внешним и внутренним радиусами.

в) Заданы площади круга и квадрата. Определить, поместится ли квадрат в круге.

г) Проверить, можно ли построить треугольник из отрезков с длинами x, y, z и, если можно, то какой - остроугольный, прямоугольный или тупоугольный.

д) Найти решение линейного уравнения ax = b.

2. Составьте схему и запишите оператор ветвления для вычисления по формулам:

а)
б)
в)

Решение (вариант а):

Оператор ветвления на языке Pascal (используем вспомогательную переменную r для вычисления значения x² + y²):

r:= x*x + y*y;

if r<=1 then z:=r;

else

if y>=x then z:= x + y;

else z:= 0.5;

Схема алгоритма вычисления по формуле 2 а представлена на рис. 6.7.

Рис. 6.7. Схема алгоритма вычисления по формуле 6а.

7. Постройте графики функций y(x), заданных командами ветвления:

а) if x<=-1 then y:=1/x**2 else if x<=2 then y:=x*x else y:=4	в) if x<-0.5 then y:=1/abs(x) else if x<1 then y:=2 else y:=1/(x-0.5)
Решение	г) if x<0 then y:=1 else if x<3.14 then y:=cos(x) else y:=-1
б) if x<-5 then y:=-5 else if x<0 then y:=x else if x<3 then y:=2*x else y:=6	д) if abs(x)>2 then y:=x*x else if x<0 then y:=-2*x else if x>=1 then y:=4 else y:=4*x*x

8. Составьте схему алгоритма и программу для решения следующих задач:

а) определить, является ли треугольник с заданными сторонами a, b, c равнобедренным;

б) определить количество положительных чисел среди заданных чисел a, b и c;

в) меньшее из двух заданных неравных чисел увеличить вдвое, а большее оставить без изменения;

г) определить, принадлежит ли заданная точка (x, y) кольцу с центром в начале координат, с внутренним радиусом R1 и внешним радиусом R2;

ж) упорядочить по убыванию последовательность трех чисел x, y и z.