Одномерный массив состоит из 5 элементов. Массив заполняется случайными числами из диапазона от 0 до 20. Выведите массив на экран в строчку и найдите произведение элементов массива.

//PascalABC.Net 3.2beginwrite ('Первоначальный случайный массив: ');var a:=arrrandom (5, -100, 100); a.Println;var x:=1;for var i:=0 to 4 do x*=a[i];write ('Произведение элементов массива: ', x);end.