Μετατροπή συνάρτησης σε διαδικασία

Μετατρέψτε την παρακάτω συνάρτηση σε διαδικασία
     ΣΥΝΑΡΤΗΣΗ Φ(Α, Β, Γ) : ΠΡΑΓΜΑΤΙΚΗ
     ΜΕΤΑΒΛΗΤΕΣ
            ΑΚΕΡΑΙΕΣ: Α, Β
            ΠΡΑΓΜΑΤΙΚΕΣ: Γ
     ΑΡΧΗ
            ΑΝ Α > Β ΤΟΤΕ
                    Α <-- Α+1
                    Β <-- Β*2
            ΑΛΛΙΩΣ_ΑΝ Α < Β ΤΟΤΕ
                    Α <-- Α-1
                    Β <-- Β-2
            ΑΛΛΙΩΣ
                    Α <-- 2*Α
                    Β <-- Β+7
            ΤΕΛΟΣ_ΑΝ
            Φ <-- 100*Α+200*Β+300*Γ
     ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ


Λύση


     ΔΙΑΔΙΚΑΣΙΑ Φ(Α, Β, Γ, Δ)

     ΜΕΤΑΒΛΗΤΕΣ

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

            ΠΡΑΓΜΑΤΙΚΕΣ: Γ, Δ

     ΑΡΧΗ

            Χ <-- Α

            Υ <-- Β

            ΑΝ Χ > Υ ΤΟΤΕ

                    Χ <-- Χ+1

                    Υ <-- Υ*2

            ΑΛΛΙΩΣ_ΑΝ Χ < Υ ΤΟΤΕ

                    Χ <-- Χ-1

                    Υ <-- Υ-2

            ΑΛΛΙΩΣ

                    Χ <-- Χ*Α

                    Υ <-- Υ+7

            ΤΕΛΟΣ_ΑΝ

            Δ <-- 100*Χ+200*Υ+300*Γ

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

Συμπληρώστε τα κενά

Δίνονται οι παρακάτω προτάσεις
1.  ______________ είναι γραμμένος σε ψευδογλώσσα.
2.  ___________ τελειώνει με τη δεσμευμένη λέξη
    Τέλος και το όνομά του.
3. _________ είναι γραμμένο σε μια γλώσσα προ-
    γραμματισμού.
4. ____________ είναι ένα σύνολο εντολών που
    κατευθύνουν τον υπολογιστή προκειμένου να
    εκτελέσει μια συγκεκριμένη εργασία.
και οι λέξεις:
    α. Ο αλγόριθμος
    β. Το πρόγραμμα
Γράψτε τον αριθμό της πρότασης (1-4) και δίπλα το
γράμμα (α ή β) των λέξεων με τις οποίες πρέπει να
συμπληρωθεί το αντίστοιχο κενό.

Λύση

    1. α
    2. α
    3. β
    4. β

Συμπλήρωση κενών

Δίνονται οι παρακάτω προτάσεις
   1.  Τα ______________ προβλήματα έχουν τουλάχιστον μια
        λύση.
   2.  Τα ___________ προβλήματα είναι ακόμα υπό διερεύνηση
        ως προς τη δυνατότητα επίλυσής τους.
   3.   ___________ χαρακτηρίζονται και προβλήματα που
         μπορεί να είναι συναφή με άλλα προβλήματα που έχει
         αποδειχθεί ότι λύνονται.
   4.  __________ προβλήματα είναι εκείνα για τα οποία δεν
        είμαστε σίγουροι ούτε αν λύνονται ούτε αν δε λύνονται.
   5. Η ύπαρξη ζωής σε άλλους πλανήτες και η θεραπεία του
       καρκίνου είναι _______ προβλήματα.
   6. Ο υπολογισμός της περιμέτρου ενός ορθογωνίου και
       ο υπολογισμός του συνολικού εμβαδού μιας πλατείας
       είναι __________ προβλήματα.
και οι λέξεις:
     α. επιλύσιμα
     β. ανοικτά
Γράψτε τον αριθμό της πρότασης (1-6) και δίπλα το γράμμα
(α ή β) της λέξης που πρέπει να μπει στο αντίστοιχο κενό.

Λύση

    1. α
    2. β
    3. α
    4. β
    5. β
    6. α

Συγγραφή διαδικασίας

Γράψτε διαδικασία η οποία δέχεται ως παράμετρο έναν
ακέραιο πίνακα Α[13, 13], μια ακέραια τιμή Ν (τέτοια
ώστε 1 <=Ν <= 13 και μια λογική τιμή Τ και εμφανίζει
ταξινομημένα κατά αύξουσα σειρά τα στοιχεία της:
* Ν γραμμής, αν Τ = ΑΛΗΘΗΣ
* Ν στήλης, αν Τ = ΨΕΥΔΗΣ

Λύση

      ΔΙΑΔΙΚΑΣΙΑ ΤΑΞ(Α, Ν, Τ)
      ΜΕΤΑΒΛΗΤΕΣ
             ΑΚΕΡΑΙΕΣ: Α[13, 13], Ν, Β[13], Κ, Λ, ΒΟΗΘ
             ΛΟΓΙΚΕΣ: Τ
      ΑΡΧΗ
             ΑΝ Τ = ΑΛΗΘΗΣ ΤΟΤΕ
                     ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 13
                           Β[Κ] <-- Α[Ν, Κ]
                     ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΑΛΛΙΩΣ
                     ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 13

                           Β[Κ] <-- Α[Κ, Ν]

                     ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

             ΤΕΛΟΣ_ΑΝ
             ΓΙΑ Κ ΑΠΟ 2 ΜΕΧΡΙ 13
                  ΓΙΑ Λ ΑΠΟ 13 ΜΕΧΡΙ Κ ΜΕ_ΒΗΜΑ -1

                           ΑΝ Β[Λ-1] > Β[Λ] ΤΟΤΕ

                                 ΒΟΗΘ <-- Β[Λ-1]

                                 Β[Λ-1] <-- Β[Λ]

                                 Β[Λ] <-- ΒΟΗΘ

                           ΤΕΛΟΣ_ΑΝ

                  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 

             ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 13

                   ΓΡΑΨΕ Β[Κ] 

             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

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

Διορθώστε τα λάθη

Διορθώστε τα λάθη έτσι ώστε το παρακάτω σύνολο
εντολών να υπολογίζει το μέσο όρο 15 θετικών
τιμών.
      σ <-- 0
      Για κ από 1 μέχρι 15
           Αρχή_επανάληψης
                 Διάβασε Χ
           Μέχρις_ότου Χ  <= 0
      Τέλος_επανάληψης
      σ <-- σ+Χ
      Εμφάνισε σ

Λύση

      σ <-- 0

      Για κ από 1 μέχρι 15

           Αρχή_επανάληψης

                 Διάβασε Χ

           Μέχρις_ότου Χ > 0

           σ <-- σ+Χ

      Τέλος_επανάληψης

      Εμφάνισε σ/15

Υπολογισμός πλήθους επαναλήψεων

Πόσες φορές τυπώνει 'ΚΑΛΗΜΕΡΑ' η παρακάτω
Για..από..μέχρι;

     Για κ από 1.2 μέχρι 8.7 με_βήμα 0.2
           Εμφάνισε 'ΚΑΛΗΜΕΡΑ'
     Τέλος_επανάληψης


Απάντηση


     Αφού οι τιμές που εμπλέκονται στην δομή είναι
     πραγματικού τύπου, κάνω το ακόλουθο τρικ:
     τις πολλαπλασιάζω όλες με το 10 και τις κάνω
     ακέραιες. Στο πρόχειρο μου ξαναγράφω την εντολή
          Για κ από 12 μέχρι 87 με_βήμα 2

                Εμφάνισε 'ΚΑΛΗΜΕΡΑ'

          Τέλος_επανάληψης

     Τώρα μπορώ εύκολα να υπολογίσω το πλήθος των

      επαναλήψεων με τον τύπο:

                (87-12) div 2 + 1 = 75 div 2 + 1 = 37+1 = 38

Άσκηση: συγγραφή διαδικασίας

Γράψτε διαδικασία που δέχεται ως παράμετρο ένα
ακέραιο πίνακα Α[3, 4, 5] και υπολογίζει το μικρότερο
στοιχείο του και τη θέση του μέσα στον πίνακα.

Λύση

      ΔΙΑΔΙΚΑΣΙΑ ΜΙΚΡ(Α, ΜΙΝ, ΘΚ, ΘΛ, ΘΜ)
      ΜΕΤΑΒΛΗΤΕΣ
            ΑΚΕΡΑΙΕΣ: Α[3, 4, 5], ΜΙΝ, ΘΚ, ΘΛ, ΘΜ,
                                  Κ, Λ, Μ
      ΑΡΧΗ
            ΜΙΝ <-- Α[1, 1, 1]
            ΘΚ <-- 1
            ΘΛ <-- 1
            ΘΜ <-- 1
            ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 3
                  ΓΙΑ Λ ΑΠΟ 1 ΜΕΧΡΙ 4
                        ΓΙΑ Μ ΑΠΟ 1 ΜΕΧΡΙ 5
                               ΑΝ Α[Κ, Λ, Μ] < ΜΙΝ ΤΟΤΕ
                                     ΜΙΝ <-- Α[Κ, Λ, Μ]
                                     ΘΚ <-- Κ
                                     ΘΛ <-- Λ
                                     ΘΜ <-- Μ
                               ΤΕΛΟΣ_ΑΝ
                        ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
                  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
            ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ