Τίτλος
ΚαταχώρησηΤίτλος
Καταχώρηση
Γράψε
"----------------------------------------"
Γράψε
"Εύρεση απόλυτης τιμής ενός αριθμού"
Γράψε
"----------------------------------------"
Διάβασε
α
Αν
α < 0
Τότε
α <- α * (-1)
Τέλος_Αν
Γράψε
α
Γράψε
"----------------------------------------"
Γράψε
"---------------------------------------------------------------"
Γράψε
"Εύρεση απόλυτης τιμής ενός αριθμού με χρήση συνάρτησης"
Γράψε
"---------------------------------------------------------------"
Διάβασε
χ
Απολ_Τιμη <- Α_Τ(χ)
Γράψε
"|", χ, "| = ", Απολ_Τιμη
Γράψε
"---------------------------------------------------------------"
Συνάρτηση
Α_Τ
(α)
Αν
α < 0
Τότε
α <- α * (-1)
Τέλος_Αν
Α_Τ <- α
τέλος_συνάρτησης