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;

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);

  int a, b; // variáveis que receberão os valores informados
  int soma; // variável que guardará a soma dos valores informados

  // vamos pedir ao usuário que informe o primeiro valor
  System.out.print("Informe o primeiro valor: ");
  // vamos ler o primeiro valor
  a = Integer.parseInt(entrada.nextLine());

  // vamos pedir ao usuário que informe o segundo valor
  System.out.print("Informe o segundo valor: ");
  // vamos ler o segundo valor
  b = Integer.parseInt(entrada.nextLine());

  // vamos efetuar a soma
  soma = a + b;

  // vamos exibir o resultado
  System.out.println("A soma dos valores é: " + soma);
}

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

  int a, b; // variáveis que receberão os valores informados
  int soma; // variável que guardará a soma dos valores informados

  // vamos pedir ao usuário que informe o primeiro valor
  a = Integer.parseInt(JOptionPane.showInputDialog("Informe o primeiro valor:"));

  // vamos pedir ao usuário que informe o segundo valor
  b = Integer.parseInt(JOptionPane.showInputDialog("Informe o segundo valor:"));

  // vamos efetuar a soma
  soma = a + b;

  // vamos exibir o resultado
  JOptionPane.showMessageDialog(null, "A soma dos valores é: " + soma);
}

SimpleXMLElement simplexml_load_file(string $filename [, 
  string $class_name = "SimpleXMLElement" [, int $options = 0 
  [, string $ns = "" [, bool $is_prefix = false]]]])

<?xml version="1.0" encoding="iso-8859-1"?>
<cadastro>
  <cliente id="14" ativo="true">
     <nome>Osmar J. Silva</nome>
     <email>osmar@arquivodecodigos.com.br</email>
  </cliente>
  <cliente id="75" ativo="false">
     <nome>Cintia Gomes Arantes</nome>
     <email>cintia@arquivodecodigos.com.br</email>
  </cliente>
</cadastro>

<?
  $xml = simplexml_load_file("clientes.xml");
  print_r($xml);
?>

SimpleXMLElement Object ( [cliente] => Array ( 
  [0] => SimpleXMLElement Object ( [@attributes] => Array ( 
  [id] => 14 [ativo] => true ) [nome] => Osmar J. Silva 
  [email] => osmar@arquivodecodigos.net ) [1] => 
  SimpleXMLElement Object ( [@attributes] => Array ( 
  [id] => 75 [ativo] => false ) [nome] => Cintia Gomes Arantes 
  [email] => cintia@arquivodecodigos.net ) ) )

<?
  // carrega o arquivo XML e o converte em um objeto SimpleXMLElement
  $xml = simplexml_load_file("clientes.xml");
  
  // vamos mostrar os dados do primeiro cliente
  echo "Nome: " . $xml->cliente[0]->nome . "<br>";
  echo "E-Mail: " . $xml->cliente[0]->email;
?>

Nome: Osmar J. Silva
E-Mail: osmar@arquivodecodigos.com.br

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      string frase = "Gosto muito de C# e Java";
      int cont = 0;

      // remove os espaços em excesso
      while (frase.IndexOf("  ") >= 0) {
        frase = frase.Replace("  ", " ");
      }

      // remove espaços antes e depois da string
      frase = frase.Trim();

      // conta as palavras
      cont = frase.Split(" ").Length;
      Console.WriteLine("A frase contém " + cont + " palavras");

      Console.WriteLine("\n\nPressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

<?php
  // renomeia o diretório "recentes" para "atuais"
  $diretorio_antigo = "/site/public_html/recentes";
  $diretorio_novo = "/site/public_html/atuais";
  
  if(rename($diretorio_antigo, $diretorio_novo)){
    echo "Diretório renomeado com sucesso.";
  }
  else{
    echo "Não foi possível renomear o diretório.";
  }
?>