![Mathematica Sun May 26, 12:24 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palette](//img.homeworklib.com/images/7169b6e5-c0b7-4119-a6f3-43c4350539fb.png?x-oss-process=image/resize,w_560)
![Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palette](//img.homeworklib.com/images/98352b4e-dc56-49c9-858f-034286d8315c.png?x-oss-process=image/resize,w_560)
![Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palette](//img.homeworklib.com/images/1182dffa-e1e3-41cc-9c04-867c7beabcdf.png?x-oss-process=image/resize,w_560)
![Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palette](//img.homeworklib.com/images/d909998f-a710-4a8e-b9a3-d62998b2ddb0.png?x-oss-process=image/resize,w_560)
Mathematica Sun May 26, 12:24 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palettes Windam Hep This is Mathematica Software Let Q(t) be the amount of radioactive material left at time t. Infil-data= {{6, 1000), {6, 749.8), {12, 562 . 14), {18, 421.5), {24, 316), {39, 236.93), {36, 177 .64)) Out11- ((8, 1009), (6, 749.8), [12, 562.14), (18, 421.5), (24, 316), (38, 236.93), (36, 177.64} } In2- model-aExp-k t] Inl3 fit FindFit[data, model, (a, k), t] P1; ListPlot [data, AxesLabel → {t, "0(t)")) Inf4- ait) 1000 800 600 400 200 10 20 25 30 35
Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palettes Windam Hep (5- a-al. fitti 1000.01 u0.6479995 Weight in terms of months is Q(t) = ae-kt, where a =1000 and k = 0.0479995 Inf7-P2-plot [a * Exp [-k * t), {t, θ , 36), PlotStyle → Red] 1000 900 600 400 200 25 35 10 labels. s-Image ibeckground..
Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palettes Windam Hep ShowP, P2] an) 1000 B00 600 Ou[B] 100 200 20 25 30 35 label., anes, imag·'", background , more le | * a- amount of radioactive material in grams at time t 0. k rate of decay of radioactive material. Unit of is grams/month Half life of the radioactive material is In(9l- Solve [500aExp-k*t], t] {{t-14.441 } } any Hence half life is 14.441 months. 150%-
Mathematica Sun May 26, 12:25 PM Untitled-1.nb*-Wolfram Mathematica 11.3 Eile Eet sert Format Cell graphics Faluatien Palettes Windam Hep Radioactive material left (in grams) after 30 months is n[10) อา 0410-236 .935 ยู่า Time (in months) when 40 grams of radioactive material is left is In[11]-Solve [40 = a * Exp [-ke t] , t] ut 67.0609 Hence after 67 months 40grams of radioactive substance is left.