Use a small program (Delphi version) that is returned

xiaoxiao2021-03-19  197

With Delphi for so long, I have been doing database programs. I haven't done any algorithms. I did an example of the simplest way to take advantage of the flight today. The procedure is as follows.

Procedure TForm1.Button2Click (Sender: Tobject); Function JC (I: Integer): Integer; Begin I> 1 Then Result: = i * JC (I-1); End; Var AAA: Integer; Begin AAA: = STRTOINT (edit1.text); edit2.text: = INTOSTR (JC (AAA));

END;

转载请注明原文地址:https://www.9cbs.com/read-130186.html

New Post(0)