Skip to main content
Share Your Experience: Take the 2024 Developer Survey
Voitcus's user avatar
Voitcus's user avatar
Voitcus's user avatar
Voitcus
  • Member for 8 years, 11 months
  • Last seen more than 4 years ago
  • Poland
Stats
755
reputation
20k
reached
6
answers
3
questions
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.
4
silver badges
11
bronze badges
17
Score
7
Posts
78
Posts %
10
Score
2
Posts
22
Posts %
10
Score
1
Posts
11
Posts %
9
Score
3
Posts
33
Posts %
4
Score
1
Posts
11
Posts %
2
Score
1
Posts
11
Posts %
Top posts
question
24
Sep 4, 2015
answer
10
Jun 25, 2015
question
8
Sep 1, 2015
answer
7
Aug 26, 2015
question
4
Aug 17, 2015
answer
4
Sep 22, 2015
answer
2
Jun 26, 2015
answer
2
Jul 1, 2015
answer
2
Aug 11, 2015