// Este exemplo mostra como calcular a diferença
// de meses entre duas datas

const MILLISECOND:Number = 1;
const SECOND:Number = MILLISECOND * 1000;
const MINUTE:Number = SECOND * 60;
const HOUR:Number = MINUTE * 60;
const DAY:Number = HOUR * 24;

var data1:Date = new Date(2006, 5, 20);
var data2:Date = new Date(2006, 3, 20);

// diferença em milisegundos entre as duas datas
var milis:Number = Math.abs(data1.getTime() - 
  data2.getTime());

// diferença em meses e dias
var meses:int = Math.floor(milis / DAY / 30);
var dias:int = Math.floor(milis / DAY) % 30;

Alert.show("A diferença entre as duas datas é " +
  meses + " meses e " + dias + " dias");

MMRESULT midiOutOpen(
  LPHMIDIOUT lphmo,              
  UINT_PTR   uDeviceID,          
  DWORD_PTR  dwCallback,         
  DWORD_PTR  dwCallbackInstance, 
  DWORD      dwFlags             
);

function midiOutOpen(lphMidiOut: PHMIDIOUT; uDeviceID: UINT;
  dwCallback, dwInstance, dwFlags: DWORD): MMRESULT; stdcall;

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, MMSystem;

type
  TForm2 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    dispositivo: HMIDIOUT; // dispositivo de saída MIDI
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
var
  erro: Word;
begin
  erro := midiOutOpen(@dispositivo, 0, 0, 0, CALLBACK_NULL);

  // houve erro na abertura do dispositivo de saída MIDI?
  if (erro <> 0) then
    begin
      ShowMessage('Não foi possível abrir o dispositivo MIDI. Erro: ' + IntToStr(erro));
    end
  else
    begin
      ShowMessage('Dispositivo MIDI aberto com sucesso.');

      // vamos tocar uma nota para nos certificarmos de que o dispositivo
      // realmente foi aberto e está funcionando

      // vamos tocar a nota DÓ média e com velocidade máxima
      midiOutShortMsg(dispositivo, rgb($90, 60, 127));
      // vamos deixar a nota soar um pouco
      sleep(1000);
      // vamos silenciar a nota
      midiOutShortMsg(dispositivo, rgb($80, 60, 0));

      // finalmente vamos fechar o dispositivo MIDI
      midiOutClose(dispositivo);
    end;
end;

end.

MMRESULT midiOutClose(
  HMIDIOUT hmo  
);

package estudos;

public class Livro {
  // variáveis privadas
  private String titulo; // título do livro
  // variável estática que permitirá definir um
  // identificador único para cada livro
  private static int id;

  // construtor da classe Livro
  public Livro(){
    // vamos incrementar a variável estática
    Livro.id++;
  }

  // método que permite obter o id do livro
  public int getId(){
    return Livro.id;
  }

  // método que permite definir o título do livro
  public void setTitulo(String titulo){
    this.titulo = titulo;
  }

  // método que permite obter o título do livro
  public String getTitulo(){
    return this.titulo;
  }
}

package estudos;

public class Main {
  public static void main(String[] args) {
    // vamos criar um objeto da classe Livro
    Livro a = new Livro();
    a.setTitulo("Programando em Java 2");

    // vamos exibir os dados do livro
    System.out.println("Id: " + a.getId());
    System.out.println("Titulo: " + a.getTitulo());

    // vamos criar mais um livro
    Livro b = new Livro();
    b.setTitulo("A biblia do C/C++");

    // vamos exibir os dados do livro
    System.out.println("Id: " + b.getId());
    System.out.println("Titulo: " + b.getTitulo());

    // e mais um livro aqui
    Livro c = new Livro();
    c.setTitulo("PHP + MySQL");

    // vamos exibir os dados do livro
    System.out.println("Id: " + c.getId());
    System.out.println("Titulo: " + c.getTitulo());
  }
}

<?
  // variável global
  $usuario = "Osmar";
  
  function exibir(){
    echo $usuario; // acessa a variável gloal
  }
  
  // chama a função
  exibir();
?>

Notice: Undefined variable: usuario in 
xxx/estudos.php on line 6

<?
  // variável global
  $usuario = "Osmar";
  
  function exibir(){
    // permite acesso à variável global
    global $usuario;
	
    echo $usuario; // acessa a variável gloal
  }
  
  // chama a função
  exibir();
?>

<?
  // variável global
  $usuario = "Osmar";
  
  function exibir(){
    echo $GLOBALS['usuario']; // acessa a variável global
  }
  
  // chama a função
  exibir();
?>

Informe o primeiro número: 8
Informe o segundo número: 3
A soma dos números é: 11
O produto dos números é: 24
A diferença dos números é: 5
O quociente dos números é: 2.66667

package estudos;

import java.util.Scanner;

public class Estudos{
  public static void main(String args[]){
    // variáveis usadas na resolução do problema
    int n1, n2, soma, produto, diferenca;
    double quociente;
  
    // vamos ler os dois números
    Scanner leitura = new Scanner(System.in);
    System.out.print("Informe o primeiro número: ");
    n1 = Integer.parseInt(leitura.nextLine());
    System.out.print("Informe o segundo número: ");
    n2 = Integer.parseInt(leitura.nextLine());
    
    // vamos somar os dois números
    soma = n1 + n2;
    // vamos calcular o produto
    produto = n1 * n2;
    // vamos calcular a diferença
    diferenca = n1 - n2;
    // vamos calcular o quociente
    quociente = n1 / (n2 * 1.0);
  
    // vamos mostrar os resultados
    System.out.println("A soma dos números é: " + soma);
    System.out.println("O produto dos números é: " + produto);
    System.out.println("A diferenca dos números é: " + diferenca);
    System.out.println("O quociente dos números é: " + quociente);
  }
}

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos ativar o client dataset
  ClientDataSet1.Active := True;

  // vamos testar se o client dataset foi mesmo ativado
  if ClientDataSet1.Active then
    ShowMessage('O ClientDataSet está ativo')
  else
    ShowMessage('O ClientDataSet  NÃO está ativo')
end;