In a REPEAT loop, when is the condition checked? 

What is the purpose of the main menu component in Delphi?

What is the structure of a FOR loop?

What is the primary objective of PAT Task 8? 

Given the code snippet below, what is the output once executed?

var
  age: integer;
begin
  age := 18;
  if age < 18 then
    Memo1.Lines.Add('You are a minor.')
  else if (age >= 18) and (age < 65) then
    Memo1.Lines.Add('You are an adult.')
  else
    Memo1.Lines.Add('You are a senior citizen.');
end;

Consider the following code snippet:

var
  num1, num2, num3: integer;
begin
  num1 := 8;
  num2 := 12;
  num3 := 8;
  if (num1 > num2) and (num1 > num3) then
    Memo1.Lines.Add('Sparkling moonlit ocean')
  else if (num2 > num1) and (num2 > num3) then
    Memo1.Lines.Add('Whistling through the trees')
  else if (num3 > num1) and (num3 > num2) then
    Memo1.Lines.Add('Silently dancing fireflies')
  else
    Memo1.Lines.Add('Echoes of forgotten laughter');
end;

What will be the output if this code is executed?

What is the function of the following code snippet:

procedure TForm1.FormShow(Sender: TObject);
begin
  Label1.Caption := 'Welcome to Delphi Programming!';
end;

What is the purpose of the following code snippet:

var
  arrValues: array[0..4] of integer;
  i: integer;
begin
  for i := 0 to 4 do
    arrValues[i] := i * 2;
end;

What does the following code snippet do:

var
  i: integer;
begin
  for i := 1 to 5 do
    Memo1.Lines.Add(IntToStr(i));
end;

Consider the following code snippet:

var
  arrNumbers: array[0..4] of integer;
  i: integer;
begin
  for i := 0 to 4 do
    arrNumbers[i] := i * 3 + 2;
end;

What values will be stored in the arrNumbers array after the code execution?