Εργαστήριο Υποπρογραμμάτων

Μετατροπές: Συνάρτηση ↔ Διαδικασία

🤖 Καλωσήρθες! Πάτησε "Επόμενο Βήμα" για να δεις τη μετατροπή της συνάρτησης σε διαδικασία.
ΚΥΡΙΟ ΠΡΟΓΡΑΜΜΑ
ΠΡΟΓΡΑΜΜΑ Κύριο
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Α, Β, Res
ΑΡΧΗ
ΔΙΑΒΑΣΕ Α, Β
ΓΡΑΨΕ ΠΑΡ(Α, Β)
ΚΑΛΕΣΕ Δ1(Α, Β, Res)
ΓΡΑΨΕ Res
ΓΡΑΨΕ Α, Β
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΥΠΟΠΡΟΓΡΑΜΜΑ
ΣΥΝΑΡΤΗΣΗ ΠΑΡ(Χ, Υ): ΑΚΕΡΑΙΑ
ΔΙΑΔΙΚΑΣΙΑ Δ1(Χ, Υ, Result)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ, Υ, Ζ, Result
ΑΡΧΗ
Ζ 0
ΟΣΟ Χ > 0 ΕΠΑΝΑΛΑΒΕ
ΑΝ Χ MOD 2 = 1 ΤΟΤΕ
Ζ Ζ + Υ
ΤΕΛΟΣ_ΑΝ
Χ Χ DIV 2
Υ Υ * 2
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΠΑΡ Ζ
Result Ζ
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
🤖 Πάτησε "Επόμενο Βήμα" για να δεις τη μετατροπή της Διαδικασίας σε Συνάρτηση.
ΚΥΡΙΟ ΠΡΟΓΡΑΜΜΑ
ΠΡΟΓΡΑΜΜΑ Κύριο2
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: a, b
ΑΡΧΗ
ΔΙΑΒΑΣΕ a
ΚΑΛΕΣΕ Διαδ(a, b)
b F(a)
ΓΡΑΨΕ a, b
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΥΠΟΠΡΟΓΡΑΜΜΑ
ΔΙΑΔΙΚΑΣΙΑ Διαδ(x, y)
ΣΥΝΑΡΤΗΣΗ F(x): ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: x
ΠΡΑΓΜΑΤΙΚΕΣ: y, a
ΠΡΑΓΜΑΤΙΚΕΣ: a ! Το y φεύγει
ΑΡΧΗ
a 10.5 ! Τοπική
y x^2 + 4*a
F x^2 + 4*a
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ