1ο ΣΕΤ - ΛΥΣΕΙΣ ΑΣΚΗΣΕΩΝ 1-5 ΕΚΜΑΘΗΣΗΣ ΤΩΝ 1D

1.
Αλγόριθμος ασκ1σετ1
Για i από 1 μέχρι 65
     Διάβασε ΟΝ[i],ΟΦ[i]
Τέλος_επανάληψης
αθρ ← 0
Για i από 1 μέχρι 65
     αθρ ← αθρ + ΟΦ[i]
Τέλος_επανάληψης
μο ← αθρ/65
Εκτύπωσε μο
Για i από 1 μέχρι 65
     Αν ΟΦ[i] > 65/100*μο τότε
          Εκτύπωσε ΟΝ[i],'προχωρήστε σε διακοπή συμβολαίου'
     Τέλος_αν
Τέλος_επανάληψης
Τέλος ασκ1σετ1

! αν ήθελε να δημιουργώ νέους πίνακες με τα ονόματα και τις
! οφειλές των μεγαλοοφειλετών (λειτουργία αντιγραφής), τότε:
! κ ← 0
! Για i από 1 μέχρι 65
!     Αν ΟΦ[i] > 65/100*μο τότε
!         κ ← κ + 1
!        ΟΝΜΕΓΟΦ [κ] ← ΟΝ[i]
!        ΜΕΓΟΦ [κ] ← ΟΦ[i]
!     Τέλος_αν
! Τέλος_επανάληψης
! Για i από 1 μέχρι κ
!    Εμφάνισε ΟΝΜΕΓΟΦ [i],ΜΕΓΟΦ [i]
! Τέλος_επανάληψης

2.
Αλγόριθμος ασκ2σετ1
Για i από 1 μέχρι 124
     Διάβασε ΖΑΡ1[i], ΖΑΡ2[i]
Τέλος_επανάληψης
πλδιπλ ← 0
Για i από 1 μέχρι 124
     Αν ΖΑΡ1[i] = ΖΑΡ2[i] τότε
         πλδιπλ ← πλδιπλ + 1
     Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε πλδιπλ, πλδιπλ/124*100
πλ ← 0
Για i από 1 μέχρι 124
     Αν ΖΑΡ1[i] + ΖΑΡ2[i] > 8 τότε
         πλ ← πλ + 1
     Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε πλ
Τέλος ασκ2σετ1

3.
Αλγόριθμος ασκ3σετ1
Για i από 1 μέχρι 125
     Διάβασε names[i]
Τέλος_επανάληψης
Για i από 1 μέχρι 125
     Αν names[i] = "Τάκης" τότε
         names[i] ← "Δημήτρης"
     αλλιώς_αν names[i] = "Κώτσιος" τότε
         names[i] ← "Κώστας"
     αλλιώς_αν names[i] = "Τζορτζίνιο" τότε
         names[i] ← "Γιώργος"
     αλλιώς
         Αν names[i] = "Τζόνης" τότε
             names[i] ← "Γιάννης"
         Τέλος_αν
     Τέλος_αν
Τέλος_επανάληψης
Αποτελέσματα // names //
Τέλος ασκ3σετ1

4. 
Αλγόριθμος ασκ4σετ1
Δεδομένα // εκτ, πληθ, ον //  !δίνονται...
! ερωτ. α
minεκτ ← εκτ[1]
χ1 ← ον[1]
Για i από 2 μέχρι 27
     Αν εκτ[i] < minεκτ τότε
         minεκτ ← εκτ[i]
         χ1 ← ον[i]
     Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε χ1
! ερωτ. β
maxπλ ← πληθ[1]
χ2 ← ον[1]
Για i από 2 μέχρι 27
     Αν πληθ[i] > maxπλ τότε
         maxπλ← πληθ[i]
         χ2 ← ον[i]
     Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε χ2
! ερωτ. γ
αθρ ← 0
Για i από 1 μέχρι 27
     αθρ ← αθρ + πληθ[i]
Τέλος_επανάληψης
Εμφάνισε αθρ/27
Τέλος ασκ4σετ1

5.
Αλγόριθμος ασκ5σετ1
Για i από 1 μέχρι 22
     Διάβασε εισ[i], κατ[i]
Τέλος_επανάληψης
αθρ ← εισ[1]    ! ή αρχικοποιώ στο 0 και βάζω τη Για από 1 
posmax ← 1
max ← εισ[1]
posmin ← 1
min ← εισ[1]
Για i από 2 μέχρι 22
     αθρ ← αθρ + εισ[i]
     Αν εισ[i] > max τότε
         max ← εισ[i]
         posmax ← i
     Τέλος_αν
     Αν εισ[i] < min τότε
         min ← εισ[i]
         posmin ← i
     Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε αθρ/22
Εμφάνισε κατ[posmax], κατ[posmin] 
Τέλος ασκ5σετ1