Maximum difference between adjacent elements of list: Difference between revisions

Content added Content deleted

Inline

@@ Line 5: / Line 5: @@
 The list may have a negative value, a zero value, a real number.
 <br>
-List = [2, -3 ,0, 1, 1, -2.3, 0, 5.5, 8, 6, 2, 9, 11, 8, 1]
+List = [1,8,2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,10,3]
+<br>
+Output would be:
+<br>
+,9 ==> 7
+,8 ==> 7
+,3 ==> 7
 <br><br>
@@ Line 12: / Line 17: @@
 <lang ring>
 see "working..." + nl
-strList = "[2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,8,1]"
+strList = "[1,8,2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,10,3]"
 see "Maximum difference between adjacent elements of list is:" + nl + nl
 see "Input list = " + strList + nl + nl
 see "Output:" + nl
-sList = [2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,8,1]
+sList = [1,8,2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,10,3]
 sortList = []
@@ Line 29: / Line 34: @@
 sortList = sort(sortlist,1)
 sortList = reverse(sortlist)
+flag = 1
 for n=1 to len(sortList)-1
@@ Line 41: / Line 47: @@
     ok
     if oldDiff1 = oldDiff2
+       if flag = 1
-       see "" + first1 + "," + second1 + " ==> " + oldDiff1 + nl
-       see "" + first2 + "," + second2 + " ==> " + oldDiff2 + nl
+          flag = 0
+          see "" + first1 + "," + second1 + " ==> " + oldDiff1 + nl
+          see "" + first2 + "," + second2 + " ==> " + oldDiff2 + nl
+       else
+          see "" + first2 + "," + second2 + " ==> " + oldDiff2 + nl
+       ok
     else
        exit
@@ Line 55: / Line 66: @@
 Maximum difference between adjacent elements of list is:
-Input list = [2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,8,1]
+Input list = [1,8,2,-3,0,1,1,-2.3,0,5.5,8,6,2,9,11,10,3]
 Output:
 ,9 ==> 7
-,1 ==> 7
+,8 ==> 7
+,3 ==> 7
 done...
 </pre>