выясните, сколько положительных элементов содержит матрица А размером nxn при выполнении условия a[ij] = sin(j^2-j^2/n)

[marina krasa]

Пусть дано натуральное число n. выясните, сколько положительных элементов содержит матрица А размером nxn при выполнении условия a[ij] = sin(j^2-j^2/n). помогите , завтра сессия начинается , честно слово!

[Alex11223]

Вы красивая матрица?оО Покажите себя (можно скриншот консольного окна с выводом).

[Rififi]

я красивая . матрица .

а я - красивый . вектор . давайте перемножмся! o_0

[Сtrl]

Rififi, зачет! Касательно задания - какой язык и оплата?

[Sparkman]

Сообщение от marina krasa

Пусть дано натуральное число n. выясните, сколько положительных элементов содержит матрица А размером nxn при выполнении условия a[ij] = sin(j^2-j^2/n). помогите , завтра сессия начинается , честно слово!

turbo pascal:

uses crt;
var n,k,i,j:integer;
    a:array[1..100,1..100] of real;
begin
     clrscr;
     while (n<1)or(n>100) do
     begin
          write('Enter n (from 1 to 100): ');
          readln(n);
     end;
     writeln('Matrix:');
     for i:=1 to n do
     begin
          for j:=1 to n do
          begin
               a[i,j]:=sin(sqr(j)-sqr(j)/n);
               if a[i,j]>0 then inc(k);
               write(a[i,j]:5:1);
          end;
          writeln;
     end;
     writeln('Count: ',k);
     readln;
end.