Kern- und Teilchenphysik - Blatt 10

<< Graphics`Graphics`

1.Aufgabe

av = 15.85; as = 18.34; ac = 0.71; aa = 23.22; ap = 11.46; 
    A = 120;

B120 = 
      av A - as A^(2/3) - 
        ac A^2/(A^(1/3) (1.98 + 0.015 A^(2/3))) - 
        aa (A - 4  A/(1.98 + 0.015 A^(2/3)) + 
              4  A/(1.98 + 0.015 A^(2/3))^2) + 
        ap A^(-1/2)

A = 116;

B116 = 
      av A - as A^(2/3) - 
        ac A^2/(A^(1/3) (1.98 + 0.015 A^(2/3))) - 
        aa (A - 4  A/(1.98 + 0.015 A^(2/3)) + 
              4  A/(1.98 + 0.015 A^(2/3))^2) + 
        ap A^(-1/2)

B116 - B120

A = 200;

B200 = 
      av A - as A^(2/3) - 
        ac A^2/(A^(1/3) (1.98 + 0.015 A^(2/3))) - 
        aa (A - 4  A/(1.98 + 0.015 A^(2/3)) + 
              4  A/(1.98 + 0.015 A^(2/3))^2) + 
        ap A^(-1/2)

A = 196;

B196 = 
      av A - as A^(2/3) - 
        ac A^2/(A^(1/3) (1.98 + 0.015 A^(2/3))) - 
        aa (A - 4  A/(1.98 + 0.015 A^(2/3)) + 
              4  A/(1.98 + 0.015 A^(2/3))^2) + 
        ap A^(-1/2)

B196 - B200

2. Aufgabe

em = 1.602177 10^(-19); u = 1.660538782 10^-27; 
    mC = 12.0107 u; me = 5.485799110 10^-4 u; Ee = 3 10^6 em; 
    c0 = 3 10^8; mAu = 196.966569 u;

E2C12rel = 4  me/mC

meineV = me (c0)^2/em

medyninu = Ee/c0^2/u // N

medyn = Ee/c0^2 // N

E2Au = 4 Ee medyn/mAu

E2AuineV = 4 Ee medyn/mAu/em

4. Aufgabe

Plot[1/x^3 (Sin[x] - x Cos[x]), {x, 0, 20}, 
        AxesLabel -> {"x", "F/3Q"}, PlotPoints -> 100, 
        ImageSize -> 550];