ΠΡΟΓΡΑΜΜΑ Διαγωνισμος_Ερωτησεων_Multiple_Choice
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: i,j ,min,s,θ_ερ,s2 ,ΒΑΘ[100],ΜΣ[50]
ΧΑΡΑΚΤΗΡΕΣ: Σ,Λ,Ξ,ΑΠ[100,50]
ΑΡΧΗ
!
! Εισαγωγή απαντήσεων του υποψηφίου.
!
Για i από 1 μέχρι 100
Για j από 1 μεχρι 50
Αρχη_επαναληψης
Γράψε 'Δώστε την απάντηση του',i,'στην ερώτηση',j
Διάβασε ΑΠ[i,j]
Μεχρις_οτου ΑΠ[i,j] = 'Σ' ή ΑΠ[i,j] = 'Λ' ή ΑΠ[i,j] = 'Ξ'
Τέλος_Επανάληψης
Τέλος_Επανάληψης
!
! Εύρεση των πιο δύσκολων ερωτήσεων
!
Για j από 1 μέχρι 50
ΜΣ[j] <-- 0
Για i από 1 μεχρι 100
Αν ΑΠ[i,j] = 'Σ' τοτε
ΜΣ[j] <-- ΜΣ[j] + 1
Τέλος_Αν
Τέλος_Επανάληψης
Τέλος_Επανάληψης
min <-- ΜΣ[1]
Για i από 1 μεχρι 50
Αν ΜΣ[j] < min τότε
min <-- ΜΣ[j]
Τέλος_Αν
Τέλος_Επανάληψης
Για i από 1 μεχρι 50
Αν ΜΣ[j]=min τοτε
Γραψε 'Δύσκολη ερώτηση: ',i,'Πλήθος σωστών απαντήσεων:',min
Τέλος_Αν
Τέλος_επανάληψης
Για i από 1 μέχρι 100
ΒΑΘ[i] <-- 0
Για j από 1 μεχρι 50
Αν ΑΠ[i,j] = 'Σ' τότε
ΒΑΘ[i] <-- ΒΑΘ[i]+2
αλλιώς_αν ΑΠ[i,j] = 'Λ' τότε
ΒΑΘ[i] <-- ΒΑΘ[i]-1
Τελος_αν
Τέλος_Επανάληψης
!
! Πλήθος υποψηφίων με βαθμό >50
!
Αν ΒΑΘ[i] > 50 τότε
s2 <-- s2 + 1
τελος_αν
Τέλος_Επανάληψης
γραψε 'οι υποψήφιοι που συγκέντρωσαν βαθμολογία πάνω απο 50 ειναι:',s2
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ