как чем, этим сраным говном что вшыто в него. Ебаное поделие дьявола сука. Вот блядь почему программа запускается, я ебашу данные, потом хуярю по баттону, а она вот тебе хуюшки, вот ошибочка с bad float value

#osgeng/2

reply

procedure TForm1.Button1Click(Sender: TObject);
const n=3; m=3;
var x:array[1..n,1..m] of real; s:array[1..n] of real;
i,j:integer;
b:real;
begin
begin
b:=0;
for i:=1 to n do
for j:=1 to m do
begin
x[i,j]:=StrToFloat(StringGrid1.Cells[i-1,j-1]);
b:=b+x[i,j];
end;
label2.Caption:=FloatToStr(b);
end;
begin
for i:=1 to n do
begin
s[i]:=0.0;
for j:=1 to m do
begin
x[i,j]:=StrToFloat(StringGrid1.Cells[i-1,j-1]);
s[i]:=s[i]+x[i,j];
StringGrid2.Cells[0,i-1]:=FloatToStrF(s[i],ffFixed,4,0);
end;
end;
end;
end;
en

#osgeng/4

reply

на этом говне

#osgeng/5

reply

я глиномес

#osgeng/6

reply

ПИТОН ЭТО ПРОСТО РАЙ в сравнении с этим говном

#osgeng/7

reply

я тоже так подозреваю

#osgeng/10

reply

сука и все работает если m и n равны 4, а когда 5 пизда float value и вся хуйня

#osgeng/11

reply