1)Написать программу, которая запрашивает массив из N элементов, а затем делит все элементы массива на минимальный элемент. Протестировать программу на массивах размерностью 5 и 10 элементов.
2)Написать программу, которая запрашивает массив из N элементов и увеличивает все элементы массива на максимальный элемент. Протестировать программу на массивах размерностью 8 и 10 элементов.

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016begin  var n:=ReadInteger('n=');  var a:=ArrRandomReal(n,1,50);  a.Println;  var m:=a.Min;  if m<>0 then    for var i:=0 to n-1 do a[i]/=m;  a.Printlnend.Тестовые решения:n= 515.9562486982701 12.6295463515583 11.5262675264507 24.1544637978796 45.61585426778341.38433787534893 1.09571865502651 1 2.09560152429653 3.95755643907304n= 1014.0622929614327 16.5069398081428 13.2300360101415 45.449448110745 46.6062807271286 41.3808015088461 21.5502972461052 20.3082026570608 6.33108078377837 25.08926088087692.22115203417771 2.60728623941069 2.0896962875659 7.17878189569095 7.36150466545052 6.53613544386811 3.40388915922883 3.20769918290964 1 3.96287170196298// PascalABC.NET 3.1, сборка 1174 от 22.02.2016begin  var n:=ReadInteger('n=');  var a:=ArrRandom(n,1,50);  a.Println;  var m:=a.Max;  if m<>0 then    for var i:=0 to n-1 do a[i]+=m;  a.Printlnend.Тестовые решения:n= 837 3 10 29 39 31 40 1077 43 50 69 79 71 80 50n= 109 47 40 19 20 37 21 39 26 3156 94 87 66 67 84 68 86 73 78