Реферат Теоретичне дослідження моделей програми, вирішальної задану задачу

"justify">// if (Form1-> CheckBox1-> Checked) Form1-> StringGrid1-> Options = Form1-> StringGrid1-> Options <

// else Form1-> StringGrid1-> Options = Form1-> StringGrid1-> Options>> goEditing;

}

{v; s = Form1-> StringGrid1-> Cells [ACol] [ARow]; ((CompareText (s, "") == 0) | | (CompareText (s , "-") == 0)) {}

{{v = StrToInt (s);} (...)

{> MessageBox (" Íåâåðíûå âõîäíûå äàííûå", "Îøèáêà", 0);

return;

}

}

}

{Row_Count, Col_Count; ** Result; (! Form1-> OpenDialog1-> Execute ()) return; (FileOpen (OpenDialog1-> FileName, Result, Row_Count, Col_Count))

{-> Edit1-> Clear (); -> StringGrid1-> RowCount = Row_Count-1; -> StringGrid1-> ColCount = Col_Count-1; -> StringGrid2 -> ColCount = 2 * Row_Count - 1; -> StringGrid2-> RowCount = 2; (int i = 0; i

{(int j = 0; j StringGrid1-> Cells [j] [i] = Result [i] -> Strings [j];

} -> Button1-> Enabled = true; -> Edit2-> Clear (); -> Edit3-> Clear ();

} = Row_Count-1; -> StringGrid1-> Visible = true;

}

{-> Visible = true; i, j, index = 0, sum, max = 0, t; (i = 0; i

{= 0; (j = 0; j StringGrid1-> Cells [j] [j + n-1-i] ); -> StringGrid2-> Cells [index] [0] = index; -> StringGrid2-> Cells [index] [1] = sum; (sum> max)

{= sum; = index;

} + +;

} = 0; (j = 0; j StringGrid1-> Cells [j] [j]); -> StringGrid2-> ; Cells [index] [0] = index; -> StringGrid2-> Cells [index] [1] = sum; (sum> max)

{= sum; = index;

} + +; (i = n-2; i> = 0; i -)

{= 0; (j = 0; j StringGrid1-> Cells [j + n-1-i] [j] ); -> StringGrid2-> Cells [index] [0] = index; -> StringGrid2-> Cells [index] [1] = sum; (sum> max)

{= sum; = index;

} + +;

} -> Refresh (); -> Edit3-> Text = maxindex; -> Edit2-> Text = max;

}

{(ACol == maxindex)

{-> Canvas-> Brush-> Color =

}

}