Помогите составить блок схему по информатике

Помогите составить блок схему этого алгоритма пожалуйста.

repeat
write('Vvedite koordinati pravogo nijnego ugla');
readln(i,j);
until a[i,j]<>0;

if a[i,j-1]=1 then
repeat
a[i,j]:=0;
j:=j-1;
until a[i,j]=0;

if a[i-1,j]=1 then
repeat
a[i,j]:=0;
i:=i-1;
until a[i,j]=0;