19 lines
444 B
Plaintext
19 lines
444 B
Plaintext
#include <hopper.h>
|
|
|
|
main:
|
|
x=-1
|
|
{30} rand array (x), mulby(10), ceil, mov(x)
|
|
{"Original Array:\n",x}, println
|
|
{x}array(SORT),
|
|
{x}sets(UNIQUE), mov(x)
|
|
{"Final array:\n",x}, println
|
|
|
|
y={}
|
|
{"C","Go","Go","C","Cobol","java","Ada"} pushall(y)
|
|
{"java","algol-68","C","java","fortran"} pushall(y)
|
|
{"\nOriginal Array:\n",y}, println
|
|
{y}array(SORT),
|
|
{y}sets(UNIQUE), mov(y)
|
|
{"Final array:\n",y}, println
|
|
exit(0)
|