ΠΡΟΓΡΑΜΜΑ ΤΥΠΟΙ
ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ:Α,Β,Γ,Δ ,ΑΣ,ΔΕ
ΑΡΧΗ
  ΓΡΑΨΕ 'ΠΡΕΠΕΙ ΝΑ ΤΗΡΕΙΤΑΙ ΤΟ S.I'
  ΓΡΑΨΕ
  ΓΡΑΨΕ 'ΠΙΕΣΤΕ 1 ΓΙΑ ΕΥΡΕΣΗ ΟΛΙΚΟΥ ΦΟΡΤΙΟΥ,'
  ΓΡΑΨΕ'ΠΙΕΣΤΕ 2 ΓΙΑ ΥΠΟΔΕΙΞΗ ΤΟΥ ΣΤΟΙΧΕΙΟΔΟΥΣ ΗΛ.ΦΟΡΤΙΟΥ,'
  ΓΡΑΨΕ 'ΠΙΕΣΤΕ 3 ΓΙΑ ΕΦΑΡΜΟΓΗ ΤΟΥ ΝΟΜΟΥ ΤΟΥ OHM 1.Ο,'
  ΓΡΑΨΕ'ΠΙΕΣΤΕ 4 ΓΙΑ ΕΦΑΡΜΟΓΗ ΤΟΥ ΝΟΜΟΥ ΤΟΥ OHM 2.Ο,'
  ΓΡΑΨΕ'ΠΙΕΣΤΕ 5 ΓΙΑ ΕΦΑΡΜΟΓΗ ΤΟΥ ΝΟΜΟΥ ΤΟΥ OHM 3.Ο,'
  ΓΡΑΨΕ 'ΠΙΕΣΤΕ 6 ΓΙΑ ΕΥΡΕΣΗ ΤΗΣ ΗΛ.ΕΝΤΑΣΗΣ,'
  ΓΡΑΨΕ 'ΠΙΕΣΤΕ 7 ΓΙΑ ΕΥΡΕΣΗ ΤΗΣ ΗΛ.ΤΑΣΗΣ.,'
  ΔΙΑΒΑΣΕ Γ
  ΑΝ Γ=1 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΠΡΩΤΗ ΤΙΜΗ ΤΟΥ ΦΟΡΤΙΟΥ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΔΕΥΤΕΡΗ ΤΙΜΗ ΤΟΥ ΦΟΡΤΙΟΥ: '
    ΔΙΑΒΑΣΕ Β
    Δ <-- Α+Β
    ΓΡΑΨΕ 'ΤΟ ΟΛΙΚΟ ΦΟΡΤΙΟ (q) ΕΙΝΑΙ: ',Δ,'Culomb'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=2 ΤΟΤΕ
    ΓΡΑΨΕ 'ΤΟ ΣΤΟΙΧΕΙΟΔΕΣ ΗΛ.ΦΟΡΤΙΟ ΕΙΝΑΙ: '
    ΓΡΑΨΕ '-1,6*10^-19'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=3 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΤΑΣΗ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΑΝΤΙΣΤΑΣΗ: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α/Β
    ΓΡΑΨΕ 'Η ΕΝΤΑΣΗ ΤΟΥ ΗΛ.ΡΕΥΜΑΤΟΣ ΣΕ AMPERE ΕΙΝΑΙ: ',Δ,'Ampere'

  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=4 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΕΝΤΑΣΗ ΤΟΥ ΗΛ.ΡΕΥΜΑΤΟΣ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΑΝΤΙΣΤΑΣΗ: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α*Β
    ΓΡΑΨΕ 'Η ΤΑΣΗ ΣΕ VOLT ΕΙΝΑΙ: ',Δ,'Volt'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=5 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΤΑΣΗ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ ΕΝΤΑΣΗ ΤΟΥ ΗΛ.ΡΕΥΜΑΤΟΣ: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α/Β
    ΓΡΑΨΕ 'Η ΑΝΤΙΣΤΑΣΗ ΣΕ OHM ΕΙΝΑΙ: ',Δ,'Ohm'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=6 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΟ ΗΛ.ΦΟΡΤΙΟ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΟΝ ΧΡΟΝΟ ΣΕ second: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α/Β
    ΓΡΑΨΕ 'Η ΕΝΤΑΣΗ ΣΕ AMPERE ΕΙΝΑΙ: ',Δ,'Ampere'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=7 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ Ε.ΗΛΕΚΤΡΙΚΗ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΟ ΗΛ.ΦΟΡΤΙΟ: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α/Β
    ΓΡΑΨΕ 'Η ΤΑΣΗ ΣΕ VOLT ΕΙΝΑΙ: ',Δ,'Volt'
  ΤΕΛΟΣ_ΑΝ
  ΑΝ Γ=8 ΤΟΤΕ
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΗΝ Ε.ΗΛΕΚΤΡΙΚΗ: '
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΟ ΗΛ.ΦΟΡΤΙΟ: '
    ΔΙΑΒΑΣΕ Β

    Δ <-- Α/Β
    ΓΡΑΨΕ 'Η ΤΑΣΗ ΣΕ VOLT ΕΙΝΑΙ: ',Δ,'Volt'
  ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΤΥΠΟΙ