к -0,99 y (l-2) cs <3
// Розрахунок
// Розрахунок 0,00086 V (l-5) cs <6
// Розрахунок V (l) StrToFloat (Form1.StringGrid1.Cells [1, cs]) <= time then.StringGrid1.Cells [6, cs]: = Form1.Edit3.Text else . StringGrid1.Cells [6, cs]: = FloatToStr (0);
// Розрахунок
// Розрахунок
// Внесення даних на
// Наступний крок
cs: = cs +1;
end;
end;.