Ответ:
1. Dim q,x,y,t1,t2 as Double
Input x,y
Let t1 = sin(x)
Let t2 = cos(x)
Let q=(sin(x)+cos(y))/(cos(x)-sin(y))
let q=q*t1/t2
let q=q*y
print q
2.
Dim Pi,l,x,y as Double
Let Pi =4.0*Atan(1.0)
Input x,y
Let l= cos(x)/(pi-x-x)
let l=l-2
Let L=16*x*cos(x*y)+l
Объяснение: