Блок схема

[Smiikee]

Ребят помогите составить блок схему по коду Паскалевскому. Пожалуйста, срочно нужно, уже впритык.

PHP код:

uses crt;

const n=10;
var
matrix:array [1..n,1..n] of integer;
i,j:integer;
zeropresent:boolean;
x:integer;

begin  clrscr;
Randomize;
  for i:=1 to n do begin
    for j:=1 to n do begin
      matrix[i,j]:=Random(10)-4;
      write(matrix[i,j]:3);
      end;
    writeln;
    end;

i:=1;
  while i<=n do begin
    zeropresent:=False;
    for j:=1 to n do
      if matrix[i,j]=0 then
        zeropresent:=True;
    if not zeropresent then begin
      WriteLn('Stroka ',i,' ne soderjit ni odnogo 0 elementa');
      Break;
    end;
    Inc(i);
  end;
  
  if i>n then
    Writeln('Net strok bez 0 elementov');
  Readln;
  writeln;

for i:= 1 to n-1 do
  for j:=i+1 to n do
    if (matrix[j,n] > matrix[i,n])
     and(matrix[j,n]>0) and (matrix[i,n]>0)
    then begin
     x:=matrix[i,n];
     matrix[i,n]:= matrix[j,n];
     matrix[j,n]:= x;
     end;


for i:=1 to n do begin
  for j:=1 to n do
    write(matrix[i,j]:3);
  writeln;
end;
Readln;
end.