Considere o fragmento de código abaixo:procedure

Considere o fragmento de código abaixo:procedure Formulario1.Botao1Click(Sender: TObject);varData: TDateTime;Ano, Mes, Dia : Word;beginData:= StrToDate(Edit1.Text);;DecodeDate(Data, Ano, Mes, Dia);Label1.Caption := 'Hoje é o dia ' + IntToStr(Dia) + ' doMês ' + IntToStr(Mes) + ' do Ano ' + IntToStr(Ano);end;end.Esse código foi programado usando a linguagem:

a

JavaScript

b

HTML

c

Delphi

d

Visual Basic

Próxima Questão

Reiniciar Desempenho