
51
ΑΕΠΠ – Εκδόσεις ΜΠΑΧΑΡΑΚΗ
Αν
ΜΠ[i,3] > max
τότε
max
ΜΠ[i,3]
Τέλος_Αν
Τέλος_Επανάληψης
Για
i
από
1
μέχρι
20
Αν
ΜΠ[i,3] = max
τότε
Εμφάνισε
ΤΙΤ[i]
Τέλος_Αν
Τέλος_Επανάληψης
Για
i
από
1
μέχρι
20
ΣΠ
0
Για
j
από
1
μέχρι
12
ΣΠ
ΣΠ + ΜΠ[i,j]
Τέλος_Επανάληψης
Αν
ΤΥΠ[i]= ‘‘ορχηστρική’’
και
ΣΠ >= 5000
τότε
Εμφάνισε
ΤΙΤ[i]
Τέλος_αν
Τέλος_επανάληψης
ΠΛ
0
Για
i
από
1
μεχρι
20
Ε1
0
Ε2
0
Για
j
από
1
μεχρι
6
Ε1
Ε1 + ΜΠ[i,j]
Ε2
Ε2 + ΜΠ[i,j + 6]
Τέλος_επανάληψης
Αν
Ε2 > Ε1
τότε
ΠΛ
ΠΛ +1
Τέλος_αν
Τέλος_επανάληψης
Εμφάνισε
ΠΛ
Τέλος
Θέμα_4