Напишите программу в паскале, написать программу, которая вычисляет среднее арифметическое ненулевых элементов массива m[1..100], элементы которого вычисляются по формуле m[i]=sin(i)*cos(i) и не используйте интернет, а напишите сами по возможности.