Aufgabe 2

verwendete Packages

<< Graphics`Graphics`

Konstanten

me = 9.10938188 10^-31; h = 6.62606876 10^-34; 
    hbar = h/(2 π); aL = 2 10^-9; bL = 5 10^-9; 
    cL = 10 10^-9; dL = 100 10^-9; eL = 500 10^-9;

Berechnung der Energien für n=1

E1_a = π^2 hbar^2/(2 me aL^2)

E1_b = π^2 hbar^2/(2 me bL^2)

E1_c = π^2 hbar^2/(2 me cL^2)

E1_d = π^2 hbar^2/(2 me dL^2)

E1_e = π^2 hbar^2/(2 me eL^2)

Graphen für die Energien mit n=1

Plot von E1 in Abhängigkeit von L

Plot[π^2 hbar^2/(2 me L^2), {L, 0, 500 10^-9}, 
        ImageSize -> 550];

Plots von E1_i/L in Abhängigkeit von L

E1_a/L orange, E1_b/L grün, E1_c/L blau,  E1_d/L violett,  E1_e/L rot

DisplayTogether[
        Plot[π^2 hbar^2/(2 me aL^2)/L, {L, 0, 500 10^-9}, 
          PlotStyle -> Hue[0.1]], 
        Plot[π^2 hbar^2/(2 me bL^2)/L, {L, 0, 500 10^-9}, 
          PlotStyle -> Hue[0.3]], 
        Plot[π^2 hbar^2/(2 me cL^2)/L, {L, 0, 500 10^-9}, 
          PlotStyle -> Hue[0.6]], 
        Plot[π^2 hbar^2/(2 me dL^2)/L, {L, 0, 500 10^-9}, 
          PlotStyle -> Hue[0.8]], 
        Plot[π^2 hbar^2/(2 me eL^2)/L, {L, 0, 500 10^-9}, 
          PlotStyle -> Hue[1]], ImageSize -> 550];