SET      i /1*100/;
alias(i,j);
parameters
         a(i) random numbers ;

scalars
         min1
         min2
         sumation /0/
         iteration
         ;

         loop(i,
         a(i) = uniform(10,30);
         sumation=sumation + a(i);
         );

min1=Smin(i,a(i));

*------------------------
*finding minimum number

min2 = +INF;


         loop(i,

               if (a(i) < min2,
               min2=a(i);
               );

         );

display a , min1 , min2, sumation;
