Questões de Delphi (Programação)

Avalie o código Delphi, em sua versão “Embarcadero Delphi 11”, apresentado abaixo:

var

min, max : SmallInt;

begin

// Set the minimum and maximum values of

this data type

min := Low(SmallInt);

max := High(SmallInt);

ShowMessage(‘Min smallint value =

‘+IntToStr(min));

ShowMessage(‘Max smallint value =

‘+IntToStr(max));

end;

Assinale a alternativa que apresenta corretamente o resultado impresso.

Observe o seguinte fragmento de código em linguagem Delphi, em sua versão “Embarcadero Delphi 11”:

var   Form1: TForm1;   k,l,m,n: integer;
implementation
   {$R *.dfm}
begin   k:= 25;   l := k mod 2;   m := k mod 3;   n := l+m;   ShowMessage(inttostr(l) + ‘,’ + inttostr(m) +   ‘,’ + inttostr(n)); end.

Assinale a alternativa que apresenta corretamente a saída gerada pelo programa.

Com relação ao seguinte código em linguagem Delphi, em sua versão “Embarcadero Delphi 11”: 

type   TDigits = set of ‘1’..’9’; var   digitos : TDigits; // Set variable   myChar : char;   begin     digitos := [‘2’, ‘4’..’7’];

     for myChar := ‘7’ to ‘8’ do      if myChar In digitos      then ShowMessageFmt(‘’’%s’’ ‘,[myChar])  end.

Assinale a alternativa que apresenta corretamente o resultado impresso: