I need to put this pseudocode into raptor can anyone help This is the pseudo code for pc4 ch 8

Declare Scores[10] As Integer

Declare Player[10] As String

Call Sort_Asc_Player module

Call Disp_Player_Scores module

Sort_Asc_Player module:

Declare Temp As Integer

Declare TempPlayer As String

Declare Littlest As String

Declare K, J, Index As Integer

For (K = 0: K < 10: K++)

Set Littlest = Player[K]

Set Index = K For (J = K+1: J <= 10: K++)

If Player[J] < Littlest Then

Set Littlest = Player[J]

Set Index = J

End If

End For(J)

If K != Index Then

Set TempPlayer = Player[K]

Player[K] = Player[Index]

Player[Index] = TempPlayer

Set Temp = Scores[K]

Scores[K] = Scores[Index]

Scores[Index] = Temp

End If

End For(K)

Disp_Player_Scores module:

Declare K As Integer

Set K = 0

While K < 10

Write Player[K] + /t + Scores[K]

Set K = K+1

End While(K)