// função recursiva para calcular o fatorial
// de um determinado número
function fatorial(n: Integer): Integer;
begin
  if n = 0 then
    Result := 1
  else
    Result := n * fatorial(n - 1);
end;

// vamos chamar a função recursiva
// a partir do Click de um botão
procedure TForm1.Button1Click(Sender: TObject);
var
  res: Integer;
begin
  // vamos calcular o fatorial de 5
  res := fatorial(5);

  // vamos mostrar o resultado
  ShowMessage('O fatorial de 5 é: ' + IntToStr(res));
end;

package arquivodecodigos;

import java.awt.Toolkit;
import java.awt.event.*;
 
public class Estudos{
  public static void main(String[] args){
    Toolkit tk = Toolkit.getDefaultToolkit();    
     
    if(tk.getLockingKeyState(KeyEvent.VK_CAPS_LOCK))
      System.out.println("A tecla Caps Lock está ativada");  
    else
      System.out.println("A tecla Caps Lock não está ativada");    
 
    System.exit(0);
  }
}

Adivinhe o número mágico: 100
Tente um número menor.

Adivinhe o número mágico: 50
Tente um número maior.

Adivinhe o número mágico: 60
Tente um número maior.

Adivinhe o número mágico: 80
Tente um número maior.

Adivinhe o número mágico: 90
Tente um número maior.

Adivinhe o número mágico: 95
Tente um número menor.

Adivinhe o número mágico: 94
Tente um número menor.

Adivinhe o número mágico: 93
Tente um número menor.

Adivinhe o número mágico: 92
Você acertou o número em 9 tentativas.
Classificação: Normal

package estudos;

import java.util.Random;
import java.util.Scanner;

public class Estudos {
  public static void main(String[] args) {
    // variáveis usadas na resolução do problema
    int numero_magico, palpite, tentativas = 0;
    boolean acertou = false;
    
    // para ler a entrada do usuário
    Scanner entrada = new Scanner(System.in);
    
    // vamos sortear o número entre 0 e 500
    Random rand = new Random();
    numero_magico = rand.nextInt(501);
    
    // um laço que repete enquanto o usuário não
    // acertar o número mágico
    while (!acertou) {
      System.out.print("Adivinhe o número mágico: ");
      palpite = Integer.parseInt(entrada.nextLine());
      
      // registra essa tentativa
      tentativas = tentativas + 1;
      
      // o usuário acertou o número mágico?
      if (palpite == numero_magico) {
        System.out.println("Você acertou o número em " + tentativas + " tentativas.");
        
        // mostra a classificação do usuário
        if (tentativas <= 3) {
          System.out.println("Classificação: Muito Sortudo");
        }
        else if ((tentativas >= 4) && (tentativas <= 6)) {
          System.out.println("Classificação: Sortudo");
        }
        else if ((tentativas >= 7) && (tentativas <= 10)) {
          System.out.println("Classificação: Normal");
        }
        else {
          System.out.println("Classificação: Tente Novamente");
        }
        
        // sai do laço
        acertou = true;
      } 
      else {
        // indica se o palpite é maior ou menor
        if (palpite < numero_magico) {
          System.out.println("Tente um número maior.\n");
        }
        else {
          System.out.println("Tente um número menor.\n");
        }
      }
    }
  }
}

Informe o primeiro número: 5
Informe o segundo número: 8
Informe o terceiro número: 3
O segundo número é o maior

// Um programa que lê três números inteiros e mostra o maior
programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    inteiro num1, num2, num3 
    
    // vamos solicitar os três números inteiros
    escreva("Informe o primeiro número: ")
    leia(num1)
    escreva("Informe o segundo número: ")
    leia(num2)
    escreva("Informe o terceiro número: ")
    leia(num3)
    
    // o primeiro número é o maior?
    se (num1 > num2 e num1 > num3) {
      escreva("O primeiro número é o maior")
    }
    senao {
      // o segundo número é o maior?
      se (num2 > num1 e num2 > num3) {
        escreva("O segundo número é o maior")
      }
      senao{
        // o terceiro número é o maior?
        se (num3 > num1 e num3 > num2) { 
          escreva("O terceiro número é o maior")
        }
        // os número não são diferentes
       senao {
         escreva("Os três números não são diferentes")
       }
    }
  }
}