Shuffle list and print

Python shuffle list

import random
number_list = [7, 14, 21, 28, 35, 42, 49, 56, 63, 70]
print ("Original list : ",  number_list)

random.shuffle(number_list) #shuffle method
print ("List after shuffle  : ",  number_list)

Shuffle list and print

Function SortIntegerList : String;
var a : Array of cardinal;
    i,j : integer;
      t : cardinal;
 Letter : String[1];
   AStr : String;
begin
// USING the simple Satolo cycle to unsort/scramble a numeric string
// Modified to scramble the letters of the Alphabet
  randomize;
  a := [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26];
  i := length(a);
  while i > 0 do
    begin
     dec(i);
     j := randomrange(Low(a),i);
     t := a[i];
     a[i] := a[j];
     a[j] := t;
     Letter := Chr(a[i]+64);
     AStr := AStr + Letter;
    end;
    Result := AStr;
end;

// How to use
Procedure ButtonClick(Sender: TOBject);
begin
  ShowMessage('Scrambled String '+AStr);
end;

Similar codes

2 votes260 views1 answer
Delphi how copy works
Delphi
15 votes272 views5 answers
Belle delphine
Delphi
3 votes275 views2 answers
Get current date delphi
Delphi
0 vote180 views1 answer
How to use incyear in delphi
Delphi
2 votes281 views1 answer
Get last element of array delphi
Delphi
0 vote184 views1 answer
How to validate if the text in edit has numbers in and to show a message if it has in delphi
Delphi
0 vote174 views1 answer
Remove unnecessary packages raspi pixel
Delphi
0 vote190 views1 answer
Shuffle array delphi
Delphi
0 vote183 views1 answer
How to deacrease Time in delphi
Delphi
0 vote170 views3 answers
Delphi keypress ctrl+v
Delphi