Перевод кода из delphi в C#
procedure TForm1.Button1Click(Sender: TObject);
Var i,j,n,m,k,t:integer;
a:array [1..50] of integer;
s:string;
begin
memo1.Lines[0]:='';
memo1.Lines[1]:='';
memo1.Lines[2]:='';
n:=strtoint(edit1.Text);
m:=strtoint(edit2.Text);
k:=strtoint(edit3.Text);
if n div 3=(n/3) then
begin
i:=n div 3;
memo1.Lines[0]:=inttostr(i-2)+'+'+inttostr(i)+'+'+inttostr(i+2);
edit4.Text:=inttostr(i-2);
end
else
memo1.Lines[0]:='неверно';
if m div 3=(m/3) then
begin
j:=m div 3;
if j-2i+4 then memo1.Lines[1]:='текст какой - то: ';
memo1.Lines[1]:=memo1.Lines[1]+inttostr(j-2)+'+'+inttostr(j)+'+'+inttostr(j+2);
i:=j+2;
j:=k;
t:=1;
repeat
i:=i+2;
j:=j-i;
a[t]:=i;
t:=t+1;
//memo1.Lines[2]:= memo1.Lines[2]+inttostr(i)+'+';
until j