procedure TForm1.Button2Click(Sender: TObject);
var
  indice: Integer;
begin
  // vamos obter o índice do item selecionado na ListBox
  indice := ListBox1.ItemIndex;

  // mostra o resultado
  ShowMessage('O índice do item selecionado é: '
    + IntToStr(indice));
end;

procedure DivMod(Dividend: Integer; Divisor: Word; 
  var Result, Remainder: Word);

procedure TForm2.Button1Click(Sender: TObject);
var
  dividendo, divisor: Integer;
  resultado, resto: Word;
begin
  // uses Math

  // vamos dividir 10 por 3
  dividendo := 10;
  divisor := 3;
  DivMod(dividendo, divisor, resultado, resto);

  // vamos exibir o resultado
  ShowMessage('Resultado da divisão: ' + IntToStr(resultado));

  // vamos exibir o resto
  ShowMessage('Resto da divisão: ' + IntToStr(resto));
end;

Informe o ano: 2024
O ano informado é bissexto.

#include <iostream>

using namespace std;

// função principal do programa
int main(int argc, char *argv[]){
  // variáveis usadas para resolver o problema
  int ano;
  
  // vamos solicitar que o usuário informe um ano
  cout << "Informe o ano: ";
  cin >> ano;
	
  // vamos verificar se o ano informado é bissexto
  if(((ano % 4 == 0) && (ano % 100 != 0)) || (ano % 400 == 0)){
    cout << "O ano informado é bissexto.";  
  }
  else{
    cout << "O ano informado não é bissexto.";  
  }
  
  cout << "\n" << endl;
  system("PAUSE"); // pausa o programa
  return EXIT_SUCCESS;
}

Informe a duração do evento em segundos: 3712
Duração do evento: 01:01:52

public static void main(String[] args){
  // não se esqueça de adicionar um import para a classe Scanner
  // import java.util.Scanner;

  // vamos criar um objeto da classe Scanner
  Scanner entrada = new Scanner(System.in);

  // variáveis que vão guardar a duração em horas, minutos e segundos;
  int horas, minutos, segundos;
  int duracao_segundos; // guardará a duração em segundos

  // vamos solicitar a duração do evento em segundos
  System.out.print("Informe a duração do evento em segundos: ");

  // vamos ler os segundos informados
  duracao_segundos = Integer.parseInt(entrada.nextLine());

  // vamos obter a quantidade de horas do evento
  horas = duracao_segundos / 3600;
  // vamos obter os minutos
  minutos = (duracao_segundos / 60) % 60;
  // vamos obter os segundos restantes
  segundos = duracao_segundos % 60;

  // vamos exibir a duração do evento em horas, minutos e segundos
  System.out.printf("Duração do evento: %02d:%02d:%02d\n\n", horas, minutos, segundos);
}

Console.WriteLine("O tipo decimal ocupa " + sizeof(decimal) +
  " bytes");

decimal valor = 34.50;

Literal of type double cannot be implicitly converted 
to type 'decimal'; use an 'M' suffix to create a 
literal of this type

decimal valor = 34.50m;

decimal valor = 34;