составить блок-схему по тексту программы

[Маюха Чайковская]

program zadanie_2;
uses crt;
var
a: array[1..100,1..100] of integer;
              b: array[1..100] of integer;
   i,j,n,m,n1,x: byte;
       sum,sr,o: integer;
              f: boolean;
begin
clrscr;
 randomize;
 write(‘Размерность: ‘);
 readln(n,m);
for i:=1 to n do
begin
 for j:=1 to m do
begin
 a[i,j]:=random(61)-30;
 write(a[i,j]:4);
end;
 writeln;
end;
 writeln;
  for i:=1 to n do
   for j:=1 to m do
if a[i,j]<0 then
begin
 inc(n1);
 b[n1]:=sqr(a[i,j]);
 sum:=sum+b[n1]; 

end;
 sr:=sum div n1;
for j:=1 to m do

begin
 for i:=1 to n do
begin
 inc(x);
  if odd(a[i,j]) then
begin
 o:=a[i,j];
 f:=true;
 break;
end;
end;
 if f then break;
end;
 write(‘Новый массив: ‘);
for i:=1 to n1 do write(b[i],' ');
 writeln;
 writeln(‘Сумма: ‘,sum);
 writeln(‘Среднее значение: ‘,sr);
 writeln(‘Первый нечетный элемент: ‘,o,’его номер: ‘,x);
 readln
end.

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.