#include <cstdlib>
#include <iostream>
#include <ctime>
#include <math.h>
using namespace std;
void RandArr(double *mas, int d_min,int d_max,int n)
{
int m=d_max - d_min + 1;
for(int i=0; i<n; ++i)
{
mas[i]=rand()%m + d_min;
cout << mas[i]<<" ";
}
cout <<endl;
}
void f(double *xx, double *yy, int k, int n)
{
double t=0; for(int i=0; i<n; ++i)
{
for(int j=1; j<=k; ++j)
t+=cos(j*xx[i])/(j*j);
yy[i]=t;
t=0;
}
}
void PrintStar()
{ for(int i=0; i<80; ++i) cout <<"*"; cout << endl; }
void ShowArr(double *mas,int n)
{
for(int i=0; i<n; ++i)
cout<< mas[i]<<" ";
cout <<endl;
PrintStar();
}
int main(int argc, char *argv[])
{
srand(time(0));
short const N1=20,N2=18,N3=12;
double x1[N1],x2[N2],x3[N3];
int D_MIN[3]={2,-5,7}, D_MAX[3]={10,2,10};
cout <<"X1: ";
RandArr(x1,D_MIN[0],D_MAX[0],N1);
cout <<"X2: ";
RandArr(x2,D_MIN[1],D_MAX[1],N2);
cout <<"X3: ";
RandArr(x3,D_MIN[2],D_MAX[2],N3);
double y1[N1],y2[N2],y3[N3];
f(x1,y1,4,N1);
f(x2,y2,4,N2);
f(x3,y3,4,N3);
cout <<"Y1: ";
ShowArr(y1,N1);
cout <<"Y2: ";
ShowArr(y2,N2);
cout <<"Y3: ";
ShowArr(y3,N3);
cin.get();
return EXIT_SUCCESS;
<span>}</span>
Это всё операционные системы! В интернете проверял. Так что ответ под цифрой 6.
P.s. Если ты отметишь это решение как "Лучшее", то к тебе вернётся 25% потраченных пунктов на это Задание.
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrInteger(10);
var s:=a.Where(t->t>0); // последовательность положительных
Writeln('Положительных: ',s.Count);
Writeln('Максимальный: ',a.Max);
Writeln('Сумма положительных: ',s.Sum);
Writeln('Ср.арифм. положительных: ',s.Average);
a.Transform(t->t.IsEven?2*t:t+1); a.Println
end.
<u>Пример</u>
-6 28 31 83 -25 -17 8 0 11 13
Положительных: 6
Максимальный: 83
Сумма положительных: 174
Ср.арифм. положительных: 29
-12 56 32 84 -24 -16 16 0 12 14
<span>Подставляешь от 0 до 2 с шагом 0,2 (0, 0.2, 0.4 и т.д.) числа вместо х и решаешь.</span>