Разместите вычисленные значения функции y=1+sin(π/8-x) для х∈[0, 2] с шагом h=0, 2 в одномерный массив y “cожмите” числовой массив, выбросив из него отрицательные числа. определите, является ли заданный массив по убыванию в pascal abc.

Помещаем в код листа рабочей книги макрос sub aaa()       a = range("a1: a15")       for i = 1 to 10               a(i, 1) = -a(i, 1)       next i       s = 0       for i = 11 to 15               s = s + a(i, 1)       next i       msgbox s end sub размещаем элементы массива в диапазоне от а1 до а15 и запускаем макрос.

#include < iostream> using namespace std; void conv(int n, int p) { if(n/p! =0){         conv(n/p,p);     }     cout < < n%p; }   int main() {     int n, p;     string m;     cout < < "введите n: ", cin > > n, cout < < "\n";     cout < < "введите p: ", cin > > p, cout < < "\n";     conv(n,p);     return 0; } пример: введите n: 511введите p: 8777