Question

Задача: В массиве Х, состоящем из 50 элементов, заполненном случайными числами из промежутка [-30,30], найти разность наибольшего и наименьшего элементов массива.Сделать программу как в паскале

Answer 1

Программа:

Pascal:

var

 X: array[1..50] of integer;

begin

 for var i := 1 to 50 do X[i] := random(-30, 30);

 print(X, #10, X.max - X.min);

end.