Jump to content

Search the Community

Showing results for tags 'bogosort'.

  • Search By Tags

    Type tags separated by commas.

  • Search By Author

Content Type


Forums

  • General
    • Announcements and Site News
    • Administration
  • AutoIt v3
    • AutoIt Help and Support
    • AutoIt Technical Discussion
    • AutoIt Example Scripts
  • Scripting and Development
    • Developer General Discussion
    • Language Specific Discussion
  • IT Administration
    • Operating System Deployment
    • Windows Client
    • Windows Server
    • Office

Categories

  • AutoIt Team
    • Beta
    • MVP
  • AutoIt
    • Automation
    • Databases and web connections
    • Data compression
    • Encryption and hash
    • Games
    • GUI Additions
    • Hardware
    • Information gathering
    • Internet protocol suite
    • Maths
    • Media
    • PDF
    • Security
    • Social Media and other Website API
    • Windows
  • Scripting and Development
  • IT Administration
    • Operating System Deployment
    • Windows Client
    • Windows Server
    • Office

Find results in...

Find results that contain...


Date Created

  • Start

    End

Last Updated

  • Start

    End

Filter by number of...

Joined

  • Start

    End

Group

Member Title

Location

WWW

Interests

Found 1 result

  1. DavidLago
    Hey. Bogosort: https://en.wikipedia.org/wiki/Bogosort Useless, but fun. Global $Var1, $Var2, $Var3, $Var4, $Var5, $Var6, $count = "" Global $Value = $Var1 + $Var2 + $Var3 + $Var4 + $Var5 + $Var6 Global $Number = 10000 Global $Flag = False While Not $Flag = True $count = $count + 1 $Var1 = Random(0, 2000, 1) $Var2 = Random(0, 2000, 1) $Var3 = Random(0, 2000, 1) $Var4 = Random(0, 2000, 1) $Var5 = Random(0, 2000, 1) $Var6 = Random(0, 2000, 1) $Value = $Var1 + $Var2 + $Var3 + $Var4 + $Var5 + $Var6 If $Value = $Number Then $Flag = True WEnd MsgBox(64, "Bogosort", "Bogosort took " & $count & " tries to guess 6 numbers!") Is anyone able to improve it in any way?
×
×
  • Create New...