запутался в написании блок-схемы

[Rusik1992]

#Code
var
i ,j,k: integer;
Sum1:real;
n,m,h:integer;
B:array[1..18,1..16] of real;
C:array[1..11,1..18] of real;
Alfa:array[1..16] of real;
Sum:array[1..18] of real;
begin
Form5.Show;
m:=16;
n:=18;
h:=11;
for i:=1 to 18 do
begin
for j:=1 to 16 do
Begin
B[i,j]:= StrToFloat(Form2.StringGrid1.Cells[i,j]);
End;
end;
for i:=1 to 11 do
begin
for j:=1 to 18 do
Begin
C[i,j]:= StrToFloat(Form3.StringGrid1.Cells[i,j]);
end;
end;

for i:=1 to 16 do
Begin

Alfa[i]:= StrToFloat(Form1.StringGrid1.Cells[1,i]);

End;

Sum1:=0;
for i:=k to h do
Sum[k]:=0;

for k:=1 to h do
Begin
for j:=1 to m do
Begin
for i:=1 to n do
Begin
Sum1:=Sum1+(Alfa[i]*B[i,j]*C[j,k]);
End;

End;
Sum[k]:=Sum1;
Sum1:=0;
End;

for k:=1 to h do
begin
Form5.StringGrid1.Cells[1,k]:=Form4.StringGrid1.Cells[1,k];
Form5.StringGrid1.Cells[2,k] := FloatToStr(Sum[k]);

end;
end;

[kashirin.p]

Всмысле? Я все жизнь думал, что блок-схема делается до создания программы.
И еще не думаю, что это нужно было запихнуть в раздел "Общие вопросы по Delphi"
Плюч к тому, сдесь ничего сложного нет. Что непонятно?

[astecenko]

ГОСТ 19.701-90 Вам в помощь...

[Rusik1992]

ну, а у меня по другому, я сначала программу написал, а теперь блок-схему нужно(такие требования в вузе),а как ее написать не знаю

[kashirin.p]

Сообщение от Rusik1992

ну, а у меня по другому, я сначала программу написал, а теперь блок-схему нужно(такие требования в вузе),а как ее написать не знаю

Так в чем именно ты запутался? Что не получается?