Question: Need help to turn this code to java program to use it to generate five random numbers procedure TDeck.Shuffle; var ctr: Byte; tmp: Byte; random_number:

Need help to turn this code to java program to use it to generate five random numbers

procedure TDeck.Shuffle; var ctr: Byte; tmp: Byte;

random_number: Byte; begin { Fill the deck with unique cards } for ctr := 1 to 52 do Card[ctr] := ctr;

{ Generate a new seed based on the system clock } randomize;

{ Randomly rearrange each card } for ctr := 1 to 52 do begin random_number := random(51)+1; tmp := card[random_number]; card[random_number] := card[ctr]; card[ctr] := tmp; end;

CurrentCard := 1; JustShuffled := True; end;

Step by Step Solution

There are 3 Steps involved in it

1 Expert Approved Answer
Step: 1 Unlock blur-text-image
Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock
Step: 3 Unlock

Students Have Also Explored These Related Databases Questions!