Написать программу, которая заполняет массив из 30 чисел и подсчитывает разность между минимальным и максимальным элементом

1. современное решение // pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin   var a: =arrrandom(30,-50,50); a.println;   writeln('разность между минимальным и максимальным элементом ',           a.max-a.min) end. пример -31 41 -37 18 -44 -34 -13 7 30 -22 -33 47 -1 -4 -17 -21 32 -3 24 -15 43 -41 44 36 5 2 -47 -39 5 -13 разность между минимальным и максимальным элементом 94 2. так обычно (не не всегда! ) учат в школе program selenamarogom; const   n=30;   var   i,min,max: integer;   a: array[1..n] of integer;   begin   randomize;   min: =100; max: =-100;   for i: =1 to n do begin       a[i]: =random(101)-50;       write(a[i],' ');       if a[i]> max then max: =a[i];       if a[i]< min then min: =a[i]       end;   writeln;   writeln('разность между минимальным и максимальным элементом ',max-min) end.

5)com,ru,ua 7) ipconfig 8) маска 10) ping 192.168.104.1 12) 255.255.255.248 13) 30 14)можно составить такой адрес: 102. 94.1 87.2 49, т.е. 102.94.187.249 15) 8  16) 10.59.35.40