Kern- und Teilchenphysik - Blatt 7

<< Graphics`Graphics`

2. Aufgabe

h = 6.626076 10^(-34); 
    hbar = h/(2 π); τ = 3 10^6; 
    em = 1.602177 10^(-19);

hbar π/(4 τ)

hbar π/(4 τ) /em

3. Aufgabe

En = 10*10^9; M = 938.27203 10^6; theta0 = 0; 
    theta180 = 180;

Ee = 
        En/(1 + En/M (1 - Cos[θ π/180]));

E0 = 
      En/(1 + En/M (1 - Cos[theta0 π/180])) // N

E180 = 
      En/(1 + En/M (1 - Cos[theta180 π/180])) // N

E'/E mit E/(Mc^2)=1/2

Plot[
        1/(1 + 0.5 (1 - Cos[θ π/180])), {θ, 0, 
          180}, ImageSize -> 550, 
        AxesLabel -> {"θ in grad", "E'/E"}];

E'/E mit E/(Mc^2)=10

Plot[
        1/(1 + 10 (1 - Cos[θ π/180])), {θ, 0, 
          180}, ImageSize -> 550, 
        AxesLabel -> {"θ in grad", "E'/E"}];

DisplayTogether[
        Plot[1/(1 + 0.5 (1 - Cos[θ π/180])), {θ, 
            0, 180}], 
        Plot[1/(1 + 10 (1 - Cos[θ π/180])), {θ, 
            0, 180}], ImageSize -> 550, 
        AxesLabel -> {"θ in grad", "E'/E"}];