procedure TForm1.Button1Click(Sender: TObject);
var
  hoje: TDateTime;
begin
  // não esqueça de adicionar DateUtils ao seus uses

  // vamos obter a data de hoje
  hoje := Now;

  // vamos exibir a data de hoje
  ShowMessage('Hoje é: ' + DateToStr(hoje));

  // vamos adicionar 4 dias à data de hoje
  hoje := IncDay(hoje, 4);

  // vamos exibir o resultado
  ShowMessage('Daqui a 4 dias será: ' + DateToStr(hoje));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  hoje: TDateTime;
begin
  // não esqueça de adicionar DateUtils ao seus uses

  // vamos obter a data de hoje
  hoje := Now;

  // vamos exibir a data de hoje
  ShowMessage('Hoje é: ' + DateToStr(hoje));

  // vamos subtrair 5 dias da data de hoje
  hoje := IncDay(hoje, -5);

  // vamos exibir o resultado
  ShowMessage('Há 5 dias era: ' + DateToStr(hoje));
end;

<?php
  // para executar abra uma janela de comando
  // cmd e dispare o comando abaixo:
  // C:\xampp\php>php c:\estudos_php\estudos.php
   
  // para ler a entrada do usuário
  $entrada = fopen("php://stdin","r");
  
  // vamos pedir para o usuário informar os valores dos coeficientes
  echo "Valor do coeficiente a: ";
  $a = trim(fgets($entrada));
  echo "Valor do coeficiente b: ";
  $b = trim(fgets($entrada));
  echo "Valor do coeficiente c: ";
  $c = trim(fgets($entrada));
  
  // vamos calcular o discriminante
  $discriminante = ($b * $b) - (4 * $a * $c);
    
  // a equação possui duas soluções reais?
  if($discriminante > 0){
    $raiz1 = (-$b + sqrt($discriminante)) / (2 * $a);
    $raiz2 = (-$b - sqrt($discriminante)) / (2 * $a);
    echo "Existem duas raizes: x1 = " . $raiz1 . 
      " e x2 = " . $raiz2;
  }
  // a equação possui uma única solução real?
  else if($discriminante == 0){
    $raiz1 = $raiz2 = -$b / (2 * $a);
    echo "Existem duas raizes iguais: x1 = " . $raiz1 .
      " e x2 = " . $raiz2;
  }  	
  // a equação não possui solução real?
  else if($discriminante < 0){
    $raiz1 = $raiz2 = -$b / (2 * $a);
    $imaginaria = sqrt(-$discriminante) / (2 * $a);
    echo "Existem duas raízes complexas: x1 = " . $raiz1 .
      " + " . $imaginaria . " e x2 = " . $raiz2 . " - " . $imaginaria;
  }  
?> 

import java.awt.*;
import javax.swing.*;
 
public class Estudos extends JFrame{
  private Image imagem;  
 
  public Estudos() {
    super("Carregando imagens em uma JFrame");
     
    // imagem a ser exibida
    String minhaImagem = "foto1.jpg";
 
    Toolkit toolkit = Toolkit.getDefaultToolkit();
    imagem = toolkit.getImage(minhaImagem);
    MediaTracker mediaTracker = new MediaTracker(this);
    mediaTracker.addImage(imagem, 0);
     
    try{
      mediaTracker.waitForID(0);
    }
    catch(InterruptedException ie){
      System.err.println(ie);
      System.exit(1);
    }
 
    setSize(imagem.getWidth(null), imagem.getHeight(null));
 
    setVisible(true);
  }
   
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
 
  public void paint(Graphics graphics){
    graphics.drawImage(imagem, 0, 0, null);
  } 
}

public static boolean isPar(int n){
  // sua implementação aqui
}

package estudos;

import java.util.Scanner;

public class Estudos {
  public static void main(String[] args) {
    Scanner entrada = new Scanner(System.in);
    
    // vamos solicitar que o usuário informe um número inteiro
    System.out.print("Informe um número inteiro: ");
    int numero = Integer.parseInt(entrada.nextLine());

    // vamos verificar se o número informado e par
    if(isPar(numero)){
      System.out.println("O número informado é par");
    }
    else{
      System.out.println("O número informado é ímpar");  
    }
    
    System.out.println("\n");
  }
  
  // um método estático que recebe um número inteiro e retorna true se ele par
  // e false em caso contrário
  public static boolean isPar(int n){
    // o número é par?
    if(n % 2 == 0){
      return true;  
    }
    else{
      return false; // é ímpar  
    }
  }
}

public class Estudos{ 
  static final int VALOR = 45;  

  public static void main(String args[]){ 
    // vamos tentar alterar o valor da
    // constante
    VALOR = 10;
  } 
}

Estudos.java:7: cannot assign a value to 
final variable VALOR
    VALOR = 10;
    ^
1 error

// superclasse
final class Pessoa{
  public String nome;
}

// subclasse
class Aluno extends Pessoa{
  public String matricula;
}

public class Estudos{ 
  public static void main(String args[]){ 
    // Cria um objeto da classe Aluno
    Aluno a = new Aluno();
  } 
}

Estudos.java:7: cannot inherit from 
final Pessoa
class Aluno extends Pessoa{
                    ^
1 error

// superclasse
class Pessoa{
  protected String nome;

  public final String getNome(){
    return this.nome;
  }
}

// subclasse
class Aluno extends Pessoa{
  // estamos sobrescrevendo o método
  // herdado da superclasse
  public final String getNome(){
    return "Aluno: " + this.nome;
  }
}

public class Estudos{ 
  public static void main(String args[]){ 
    // Cria um objeto da classe Aluno
    Aluno a = new Aluno();
  } 
}

Estudos.java:14: getNome() in Aluno cannot 
override getNome() in Pessoa; overriden method is final
  public final String getNome(){
                      ^
1 error