Матрицы. Вычислить элементов матрицы Y по известным элементам вектора X

@MaSS-MC · Регистрация: 15.12.2011

Студворк — интернет-сервис помощи студентам

Pascal

program soft ;
uses crt ;
var b:array[1..15] of real;
x: array [1..15] of real;
a: array [1..15,1..15] of real;
i,j,m : integer;
begin
clrscr;
write ('m=');readln(m);
randomize; for i:=1 to m do
begin
x[i]:=random(6)-20;
for j:=1 to m do
begin b[j]:=random(6)+1;
a[i,j]:=sin(ln(x[i])+x);
write(' ' ,a[i,j]:4:2);
end;
end;
readln
end.

Сравнить программу для вычисления элементов матрицы Y по известным элементам X: Y[i,j]=sin(ln(x[i]+x)
i,j=1,2..15

@Глупыш · 16.12.2011, 22:06

Pascal

1	a[i,j]:=sin(ln(x[i])+x);

нужно у Х указать номер,т.к. это массив, например:

Pascal

1	a[i,j]:=sin(ln(x[i])+x[i]);

Опции темы