Procedure TForm1.: ..
V..r
..). 'Sender: TObject);
V = V0 + at
begin
VO:=.' *.. 1. (editi.. .:);
t:=: t! I (edit2. 6.);
a:=!. . :(edit3..:);
for i:= to ; do
begin
V:= 'C+.:.;
memo1.lines. 2 'I('t='+
L
end;
end;
O
.
(i)+' ''='+'Cauc.
:(V));​

TheSiDo    3   30.04.2020 11:08    2