Μάθημα : ΠΛΗΡΟΦΟΡΙΚΗ Γ' ΛΥΚΕΙΟΥ

Α <- 5

Β <- 10

Γ <- 0

ΚΑΛΕΣΕ Διαδ_1(Α, Β)

ΓΡΑΨΕ Α, Β, Γ

ΔΙΑΔΙΚΑΣΙΑ Διαδ_1(χ, ψ)

 …
ΑΡΧΗ
          χ <- χ – ψ

ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ

ΠΡΟΓΡΑΜΜΑ α123

ΜΕΤΑΒΛΗΤΕΣ

     ΑΚΕΡΑΙΕΣ: Α, Β, Γ

ΑΡΧΗ

     Α <- 10

     Β <- 5

     Γ <- 0

     ΚΑΛΕΣΕ Διαδ_1(Α, Β)

     ΓΡΑΨΕ Α, Β

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΔΙΑΔΙΚΑΣΙΑ Διαδ_1(χ, ψ) 

ΜΕΤΑΒΛΗΤΕΣ

     ΑΚΕΡΑΙΕΣ: χ, ψ

ΑΡΧΗ

     χ <- 0

     ψ <- 0

     ΓΡΑΨΕ χ, ψ

ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ

Α <- 10

Β <- 20

ΚΑΛΕΣΕ Διαδ_1(Α, Β)

ΓΡΑΨΕ Α, Β

ΔΙΑΔΙΚΑΣΙΑ Διαδ_1(Α, Β) 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: Α, Β

ΑΡΧΗ

  ΓΡΑΨΕ Α, Β

  Α <- Α - Β

ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ

ΣΥΝΑΡΤΗΣΗ υπολογισμοί(χ, ψ): ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ: χ, ψ
ΑΡΧΗ
  ΑΝ χ > ψ ΤΟΤΕ
    υπολογισμοί <- χ - ψ
  ΑΛΛΙΩΣ
    υπολογισμοί <- χ + ψ
  ΤΕΛΟΣ_ΑΝ

ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ