procedure TForm1.Button1Click(Sender: TObject);
var
  principal, taxa, juros: double;
  meses: integer;
begin
  principal := 2000.00;
  taxa := 0.08;
  meses := 2;

  juros := principal * taxa * meses;

  ShowMessage('O total de juros a ser pago é: '
    + FloatToStr(juros));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  principal, taxa, juros, montante: double;
  meses: integer;
begin
  principal := 2000.00;
  taxa := 0.08;
  meses := 2;

  juros := principal * taxa * meses;
  montante := principal * (1 + (taxa * meses));

  ShowMessage('O total de juros a ser pago é: '
    + FloatToStr(juros));
  ShowMessage('O montante a ser pago é: '
    + FloatToStr(montante));
end;

Digite um número a ser localizado: 8

O número 8 aparece nas seguintes posições:

[8] posição => 5
[8] posição => 22
[8] posição => 26

O número 8 apareceu => 3 vez(es).

programa {
  // vamos incluir a biblioteca de utilidades
  inclua biblioteca Util --> u
	
  funcao inicio() {
    // vamos declarar as variáveis necessárias
    inteiro numeros[30]
    inteiro chave, vezes = 0

    // vamos sortear 30 números de 1 até 15 (incluindo os dois)
    para (inteiro i = 0; i < 30; i++) {
      numeros[i] = u.sorteia(1, 15)
    }

    // vamos pedir para o usuário informar a chave e vamos verificar em
    // quais posições essa chave foi encontrada
    escreva("Digite um número a ser localizado: ")
    leia(chave)
		
    escreva("\nO número " + chave + " aparece nas seguintes posições:")
    escreva("\n")
		
    para (inteiro i = 0; i < 30; i++) {
      se (numeros[i] == chave) {
        // registra a quantidade de vezes
        vezes = vezes + 1
        escreva("\n[" + numeros[i] + "]" + " posição => " + i)
      }
    }

    // agora mostramos quantas vezes o número pesquisado apareceu
    escreva("\n\nO número " + chave + " apareceu => " + vezes + " vez(es).")
    escreva("\n")
  }
}

package estudos;

import java.util.*;

public class Estudos {
  public static void main(String[] args) {
    // para ler a entrada do usuário
    Scanner entrada = new Scanner(System.in);
    
    // vamos pedir para o usuário informar um número
    // real com casas decimais
    System.out.print("Informe um número com casas decimais: ");
    // vamos ler o número informado
    double a = Double.parseDouble(entrada.nextLine());
    
    // agora vamos arredondar o valor para cima
    double b = Math.ceil(a);
    
    // e mostramos o resultado
    System.out.println("O número arredondado para cima é: " + b);
  }
}

BOOL EnableWindow(          
  HWND hWnd,
  BOOL bEnable
);

void __fastcall TForm3::Button2Click(TObject *Sender)
{
  // vamos desabilitar o TEdit usando a função EnableWindow()
  // com o valor false
  if(EnableWindow(Edit1->Handle, false)){
	ShowMessage("A caixa de texto foi desabilitada com sucesso.");
  }
}

void __fastcall TForm3::Button2Click(TObject *Sender)
{
  // vamos habilitar o TEdit usando a função EnableWindow()
  // com o valor true
  if(EnableWindow(Edit1->Handle, true)){
	ShowMessage("A caixa de texto foi habilitada com sucesso.");
  }
}

System.Object 
  System.MarshalByRefObject 
    System.ComponentModel.Component 
      System.Windows.Forms.Control 
        System.Windows.Forms.ButtonBase 
          System.Windows.Forms.CheckBox

private void button1_Click(object sender, EventArgs e){
  // vamos verificar se a CheckBox está marcada ou desmarcada
  if(checkBox1.Checked)
    MessageBox.Show("A CheckBox está marcada");
  else
    MessageBox.Show("A CheckBox está desmarcada");
}

private void button1_Click(object sender, EventArgs e){
  // vamos marcar a CheckBox
  checkBox1.Checked = true;
}