Составьте программу на Паскале для заполнения массива из 100 чисел случайными значениями из диапазона от -40 до 40. Подсчитайте в этом массиве количество положительных и сумму отрицательных чисел. На проверку прислать код программы и результат работы кода в виде скриншота окна программы с введенными входными данными.