ysdchx.~dpr

来自「运筹学算法与编程实践附书源码」· ~DPR 代码 · 共 17 行

program ysdchx;

uses
  Forms,
  shuru in 'shuru.pas' {frmshuru},
  jisuan in 'jisuan.pas' {frmjisuan};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '单纯型';
  Application.CreateForm(Tfrmshuru, frmshuru);
  Application.CreateForm(Tfrmjisuan, frmjisuan);
  Application.Run;
end.