In[]:=
f[t_]=2
-
3
160
(-32+40
2
t
-20
3
t
+
5
t
)
0≤t<2
0
True
;​​distF=ProbabilityDistribution[f[t],{t,0,2}];​​distG=TransformedDistribution
x+y
Sqrt[3]
,{x,y}ProductDistribution[{distF,2}];​​Integrate[PDF[distG,t],{t,0,4/Sqrt[3]}]
Out[]=
1