Voitcus
  • Poland
  • Member for 6 years, 2 months
Stats
735
reputation
0
reached
1
answers
0
questions
Loading…
About

HelloWorld.pas

program HappyLife;

{$X+}

const
  God = infinity;

uses
  World;

var
  Voitcus, Mom, Dad: THuman;
  birth_date: TDate;

begin
  birth_date := year(1977);
  Voitcus := THuman.Create(birth_date, Mom, Dad);
  while (Voitcus.isAlive and (System.date <= EndOfTheWorld)) do begin
    { insert your code here }
    end;
end.
This user doesn’t have any gold badges yet.
3
silver badges
4
bronze badges

Top tags (2)

Score 1
Posts 1
Score 1
Posts 1

Top posts (1)