#include <iostream>

using namespace std;

// função recursiva que calcula a potência de
// um inteiro
int potencia(int base, int expoente){
  // caso base
  if(expoente == 0){
    return 1;
  }
  // efetua mais uma chamada recursiva
  else{
    return base * potencia(base, expoente - 1);
  }
} 

// função principal do programa
int main(int argc, char *argv[]){
  int base = 3;
  int expoente = 4;

  cout << base << " elevado a " << expoente << " = " <<
    potencia(base, expoente) << endl;

  system("PAUSE"); // pausa o programa
  return EXIT_SUCCESS;
}

var
  valor: integer;
  pvalor: ^integer;

procedure TForm1.Button1Click(Sender: TObject);
var
  valor: integer;
  pvalor: ^integer;
begin
  // atribui um valor à variável valor
  valor := 20;

  // vamos atribuir à pvalor o endereço de valor
  pvalor := @valor;

  // vamos usar o ponteiro pvalor para alterar o
  // valor de valor
  pvalor^ := 30;

  // vamos obter o novo valor da variável valor
  ShowMessage('Valor de valor: ' + IntToStr(valor));
end;

 
DATE_SUB(date, INTERVAL expr unit)

 
SELECT DATE_SUB(NOW(), INTERVAL 15 DAY)

SELECT DATE_SUB(data_hora_compra, INTERVAL 
2 MONTH) FROM tabela_estudos

(
  ; vamos declarar a variável que vamos usar
  let (numero)	
  ; vamos inicializar a variável com o valor 1
  (setq numero 1)
  ; agora iniciamos o laço
  (loop 
    ; escrevemos o valor da variável
    (write numero)
    ; aumentamos o valor da variável em 1
    (setq numero (+ numero 1))
    ; provocamos uma quebra de linha 
    (terpri)
    ; e fazemos o teste da continuidade
    (when (> numero 10) (return))
  )
)

<?php
  $string = "*"; 
  echo "Resultado: " . str_repeat($string, 5);
?>