Программа 3. Задача 1

>

restart;

>

#Дано

>	sina:=0.6: cosa:=0.8:

>	F:=10: M:=34: P:=2:

>	# Уравнения проекций

>	eq1:=Xa-F*cosa+P:

>	eq2:=Ya+Yb+F*sina:

>	# Уравнение моментов относительно точки А

>	eq3:=2*Yb-2*F*cosa+8*F*sina-M-3*P:

>	r:=solve({eq1,eq2,eq3},{Xa,Yb,Ya});

>	assign(r);

Проверка

>	-Ya*8-6*Yb+3*Xa-5*F*cosa-M;