CLS

DO
    PRINT "Berechnung von drei Widerstaenden"

    INPUT "Geben Sie den ersten Widerstand ein"; zahl1

    INPUT "Geben Sie den zweiten Widerstand ein"; zahl2

    INPUT "Geben Sie den dritten Widerstand ein"; zahl3

    Rges = zahl1 + zahl2 + zahl3

    PRINT "Der Widerstand betraegt";

    if Rges < 1000 then
        print Rges; " Ohm"
    elseif Rges >= 1000 AND Rges < 1000000 THEN
        print Rges / 1000; " kiloOhm"
    elseIF Rges >= 1000000 AND Rges < 1000000000 THEN
        print Rges / 1000000; "Megaohm"
    else
        PRINT Rges / 1000000000; "Gigaohm"
    end if

LOOP