Элементы матрицы

@impuls__s · Регистрация: 10.02.2010

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

Элементы матрицы A (n x n) вычисляются по формуле
Ai,j = sin(i*j) (i,j = 1,2,3, … , n).
Необходимо:

а) сформировать матрицу В:
Bi,j=1\j * ∑Ai,j , (i,j = 1,2,3, … , n)

б) вывести на печать матрицы А и В.

@Puporev · 28.09.2010, 21:02

Pascal

uses crt;
const nmax=20;
var a,b:array[1..nmax,1..nmax] of real;
    n,i,j:byte;
    sm:real;
begin
clrscr;
repeat
write('Размер матриц до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Матрица А:');
sm:=0;
for i:=1 to n do
 begin
   for j:=1 to n do
    begin
     a[i,j]:=sin(i*j);
     write(a[i,j]:5:2);
     sm:=sm+a[i,j];
    end;
   writeln;
 end;
writeln('Сумма=',sm:0:2);
writeln;
writeln('Матрица В:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    b[i,j]:=sm/j;
    write(b[i,j]:5:2);
   end;
  writeln;
 end;
readln
end.

@impuls__s 0 / 0 / 0 Регистрация: 10.02.2010 Сообщений: 37
		1
	Элементы матрицы 28.09.2010, 19:30. Показов 1088. Ответов 1 Метки нет (Все метки) Элементы матрицы A (n x n) вычисляются по формуле Ai,j = sin(ij) (i,j = 1,2,3, … , n). Необходимо: а) сформировать матрицу В: Bi,j=1\j ∑Ai,j , (i,j = 1,2,3, … , n) б) вывести на печать матрицы А и В. 0

	28.09.2010, 21:02

Элементы матрицы

Решение