7.12.Б)в)г)д)
7.13.б)81; в)21; д)11; е)44.
7.14.б)0; в)13; д)52; е)14.
7.15.
б)алгТреугольник1(аргвещa,b,UgolC,резвещc, UgolA, UgolB, S)
нач
ввод a, b, UgolC
c:=sqrt(a*a+b*b-2*a*b*cos(UgolC))
UgolA:=arcsin(a*sin(UgolC)/c)
UgolB:=arcsin(b*sin(UgolC)/c)
S:=b*c*sin(UgolA)/2
вывод c, UgolA, UgolB, S
кон
в) алг Треугольник2(арг вещ a,b,c, рез вещ Radius,UgolA)
нач вещ p
ввод a,b,c
p:=(a+b+c)/2
UgolA:=2*arctg(sqrt((p-b)*(p-c)/(p*(p-a))))*180/3.14
Radius:=a*b*c/(4*sqrt(p*(p-a)*(p-b)*(p-c)))
вывод Radius, UgolA
кон
г) алг Объем и Площадь Пирамиды(арг вещ a,UgolAGrad, рез вещ V, S)
нач вещ H,SBase,UgolARad
| H - высота пирамиды; SBase - площадь основания
ввод a,UgolAGrad
UgolARad:=UgolAGrad*3.14/180
SBase:=a*a*sqrt(3)/4
H:=a*sqrt(3)/6*tg(UgolARad)
V:=SBase*H/3
S:=SBase*(1+1/cos(UgolARad))
вывод V, S
кон
д) алг Объем и Площадь конуса(арг вещ RBig,RSmall,Ugol, рез вещ V, S)
нач вещ H,L
ввод RBig,RSmall,Ugol
H:=(RBig-RSmall)*tg(Ugol)
L:=(RBig-RadSmall)/cos(Ugol)
V:=1/3*3.14*H*(RSmall**2 + RBig**2 + RSmall*RBig)
S:=3.14*L*(RBig+RSmall)
вывод V, S
кон
е) алг Параметры пирамиды (арг вещ a,UgolA, рез вещ V, S, Sесtion)
нач вещ H
ввод a,UgolA
H:=a*sqrt(2)/2*tg(UgolA)
V:=1/3*a*a*H
Sесtion:=a*H*sqrt(2)/2
S:=a*a*(1+sqrt(2*tg(UgolA)**2+1))
выводV, S, Sесtion
кон
7.16.
б)алгКоличество положительных(аргвещa,b,c,резцел k)
надо| k - количество положительных чисел среди чисел a,b,c
нач
ввод a,b,c; k:=0
еслиa>0
тоk:=k+1
все
еслиb>0
тоk:=k+1
все
еслиc>0
тоk:=k+1
все
выводk
кон
в)алгПреобразование(аргрезвещa,b)
надо|меньшее из a,b увеличено вдвое
нач
ввод a,b
если a>b
то b:=b*2
иначе a:=a*2
все
выводa,b
кон
г)алгПодобие треугольников(аргвещa,b,c,d,резлог Otvet)
дано| a,b и c,d - катеты двух треугольников
надо| Otvet=да, если треугольники подобны
нач
ввод a,b,c,d
если(a*d=с*b)или(a*c=d*b)
тоOtvet:=да
иначеOtvet:=нет
все
выводOtvet
кон
д)алгТочки(аргвещxA,yA,xB,yB,xC,yC,резлит Otvet)
начвещDistA,DistB,DistC
вводxA,yA,xB,yB,xC,yC
DistA:=sqrt(xA**2 + yA**2)
DistB:=sqrt(xB**2 + yB**2)
DistC:=sqrt(xC**2 + yC**2)
если (DistA < DistB) и (DistA < DistC)
тоOtvet:="Это точка А"
иначееслиDistB < DistC
тоOtvet:="Это точка B"
иначеOtvet:="Это точка C"
все
все
выводOtvet
кон
е)алгПринадлежность кольцу(аргвещx,y,r1,r2,резлог Otvet)
дано| r2>r1
надо| Otvet=да, если точка (x,y) принадлежит кольцу
| c внутренним радиусом r1 и внешним радиусом r2
нач
вводx,y,r1,r2
если(x*x+y*y<=r2*r2)и(x*x+y*y>=r1*r1)
тоOtvet:=да
иначеOtvet:=нет
все
выводOtvet
кон
ж)алгУпорядочение по возрастанию(аргрезвещa, b, c)
надо| числа a, b, c упорядочены по возрастанию
нач вещ t
ввод a, b, c
еслиa>b
тоt:=a; a:=b; b:=t | меняются местами значения a и b
все
еслиa>c
тоt:=a; a:=c; c:=t | меняются местами значения a и c
все
еслиb>c
тоt:=b; b:=c; c:=t | меняются местами значения b и c
все
выводa, b, c
кон
