ΛΥΣΗ ΕΠΑΝΑΛΗΠΤΙΚΗΣ ΑΣΚΗΣΗΣ 4

Αλγόριθμος Υποτροφίες   

Για i από 1 μέχρι 50 ! ερώτημα α 

    Διάβασε ΟΝΟΜΑ[i]  

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

Για i από 1 μέχρι 50 ! ερώτημα β    

 Για j από 1 μέχρι 3    

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

       Διάβασε ΒΑΘ[i, j]  

   Μέχρις_ότου ΒΑΘ[i, j] > 0 και ΒΑΘ[i, j] <= 10  

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

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

 Για i από 1 μέχρι 50 ! ερώτημα γ    

 Αν (ΒΑΘ[i, 1] <>) ή (ΒΑΘ[i, 2] <>) ή (ΒΑΘ[i, 3] <>) τότε   

    ΤΕΛΙΚΟΣ[i] ← 0    

 Αλλιώς  

     ΤΕΛΙΚΟΣ[i] ← 20 / 100 * ΒΑΘ[i, 1] + 35 / 100 * ΒΑΘ[i, 2] + 45 / 100 * ΒΑΘ[i, 3]     

Τέλος_αν  

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

Για i από 2 μέχρι 50 ! ερώτημα δ   

  Για j από 50 μέχρι i με_βήμα -1 

      Αν ΤΕΛΙΚΟΣ[j-1] < ΤΕΛΙΚΟΣ[j] τότε  ! φθίνουσα 

        Αντιμετάθεσε ΤΕΛΙΚΟΣ[j-1], ΤΕΛΙΚΟΣ[j]    

     Αντιμετάθεσε ΟΝΟΜΑ[j-1], ΟΝΟΜΑ[j]    

   Τέλος_αν   

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

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

 Για i από 1 μέχρι 50 ! ερώτημα ε 

    Αν (ΤΕΛΙΚΟΣ[i] <> 0) τότε  !    > 0       

Εμφάνισε ΟΝΟΜΑ[i], ΤΕΛΙΚΟΣ[i]   

  Τέλος_αν   

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

 πλήθος ← 0 ! ερώτημα στ   

Για i από 1 μέχρι 50  

   Αν ΤΕΛΙΚΟΣ[i] = 0 τότε    

   πλήθος ← πλήθος + 1   

  Τέλος_αν   

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

ποσοστό ← 100 * πλήθος / 50 

  Εμφάνισε ποσοστό 

Τέλος Υποτροφίες