Question

Дан массив А (1..4,1..8) случайных целых чисел в диапазоне [-10,40]. Составить программу поиска разницы между максимальным и минимальным элементом.

Answer 1

begin

 var a := MatrRandom(4, 8, -10, 40);

 a.Println(4);

 var s := a.ElementsByRow;

 Writeln('Разница равна ', s.Max - s.Min)

end.