
-----------------------------------
avinash336078
Tue Jun 09, 2009 5:57 pm

Single Dimentional Array Reversal Game
-----------------------------------
What is it you are trying to achieve?
I need help editing a small part of this program I made but have no idea how


What is the problem you are having?
I need to set it up so that this program:

1. I need to set it up so that it shows the user how many tries it took to place the numbers in order from 0-9
2. I need to set it up so that the screen is cleared when a new number is entered and with the new rearranged  sequence on the screen asking for another number
3. I need to set it up so that the random sequence is placed in its respective ordinal number. For example if the sequence is 7 8  5  3  6  9  0  1  3  2 set it up so that it looks like this once ran:

Ordinal number :                 1  2  3  4  5  6  7  8  9  10
Random number Sequence: 7  8  5  3  6  9  0  1   3  2

Please enter the range of numbers you want to reverse:

Describe what you have tried to solve this problem



Post any relevant code (You may choose to attach the file instead of posting the code if it is too long)
var range : int
var Range : string
var count : array 1 .. 10 of int
var dup : array 1 .. 10 of int
var count1, count2, count3 : int
count1 := 0
count2 := 0
count3 := 0
colourback (0)
colour (7)
% The following is the errortrap for the program.
procedure errortrap (var input : string, var num : int)
    loop
        put " " : 38 ..
        get input : *
        if strintok (input) = true and strint (input) > 1 and strint (input) 