#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>
<em>// PascalABC.NET 3.2, сборка 1356 от 04.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var m:=ReadInteger('Количество строк в матрице:');
var n:=ReadInteger('Количество столбцов в матрице:');
Writeln('*** Исходная матрица[',m,',',n,'] ***');
var a:=MatrRandom(m,n,-50,50);
a.Println(4);
for var i:=0 to m-1 do
for var j:=0 to n-1 do
if a[i,j].IsEven then a[i,j]:=1;
Writeln('*** Результирующая матрица[',m,',',n,'] ***');
a.Println(4);
end.
<u>Пример</u>
Количество строк в матрице: 6
Количество столбцов в матрице: 9
*** Исходная матрица[6,9] ***
23 -23 -25 38 40 38 50 45 -35
-41 31 2 30 37 -30 -9 -8 -28
-12 20 -20 32 29 7 19 23 46
-48 -21 -27 19 10 -17 -20 -27 -47
-39 -11 19 -23 9 6 29 -24 -14
2 -7 37 -22 38 23 5 -33 37
*** Результирующая матрица[6,9] ***
23 -23 -25 1 1 1 1 45 -35
-41 31 1 1 37 1 -9 1 1
1 1 1 1 29 7 19 23 1
1 -21 -27 19 1 -17 1 -27 -47
-39 -11 19 -23 9 1 29 1 1
1 -7 37 1 1 23 5 -33 37
СРЗНАЧ - в данном случае это среднее арифметическое четырех ячеек B5:D5. Их значение равно 80, "полное" 80 * 4 = 320.
Зная значение ячейки E5, найдем значения трех ячеек B5:D5, (320 - 20)/3 = 100. Получили B5 = 100, C5 = 100, D5 = 100.
Из этого можем найти сумму B5:D5 - 100 + 100 + 100 = 300.
Ответ: 300.
<span>uses crt;
const s='Софокл';
var n,m,i,j,cf,ct:integer;
begin
randomize;
n:=25;
m:=(80)div n;
for i:=1 to n do
begin
gotoXY(m*(i-1),i);
cf:=random(9)+8;//от голубого до желтого
ct:=random(9);//от синего до серого
textbackground(cf);
textcolor(ct);
write(s);
end;
end. попробуй это </span>