Составить блок-схему алгоритма и программу на алгоритмическом языке

[Sven84]

Пожалуйста помогите сделать эти два задания,никак не могу понять их.Сделать можно их в бейсике или паскале

[Mad_Cat]

Alt+Prtsc мы видимо пользоваться не умеем)
готов взяться! контакты ниже!

[Don Karleone]

1) объявляешь константу n (например n=20);
2) объявляешь матрицу а размерностью [1..n,1..n];
3) заполняешь массив элементами и одновременно считаешь кол-во положительных:

Count:=0;
for i:=1 to n do
  for j:=1 to n do
    begin
      a[i,j]:=sin(1+j/2);
      if a[i,j] > 0 then Inc(Count)
    end;