procedure TForm1.Button2Click(Sender: TObject);
begin
  // vamos selecionar o segundo item na ListBox
  ListBox1.ItemIndex := 1; // o índice do primeiro item é 0

  // note que este código não funciona para ListBoxes de
  // seleção múltipla
end;

    
int tolower(int c);

 
#include <stdio.h>
#include <stdlib.h>
 
void strtolower(char *string){
  while(*string){
    *string = tolower(*string);
    string++;
  }
}
 
int main(int argc, char *argv[])
{
  char frase[] = "PROGRAMANDO EM C";
  strtolower(frase);
   
  printf("%s\n\n", frase);
   
  system("PAUSE");  
  return 0;
}

// declara, constrói e inicializa um vetor de 10 inteiros
int[] valores = {4, 21, 9, 8, 12, 21, 4, 4, 1, 10};

Informe um valor: 4
O valor foi encontrado: 3 vezes

Informe um valor: 8
O valor foi encontrado: 1 vezes

Informe um valor: 3
O valor foi encontrado: 0 vezes

using System;

namespace Estudos {
  class Principal {
    // função principal do programa C#
    static void Main(string[] args) {
      // declara, constrói e inicializa um vetor de 10 inteiros
      int[] valores = { 4, 21, 9, 8, 12, 21, 4, 4, 1, 10 };

      // vamos ler um valor inteiro
      Console.Write("Informe um valor: ");
      int pesquisa = Int32.Parse(Console.ReadLine());

      // vamos verificar quantas vezes o valor informado está
      // contido no vetor
      int repeticoes = 0;
      for (int i = 0; i < valores.Length; i++) {
        if (valores[i] == pesquisa) {
          repeticoes++; // encontrou? vamos contar esta ocorrência
        }
      }

      // vamos mostrar o resultado
      Console.WriteLine("O valor foi encontrado: " +
        repeticoes + " vezes");
      
      Console.WriteLine("\n\nPressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

#include <iostream>
#include <cstdlib>
   
using namespace std;
   
int main(int argc, char *argv[]){
  int numero;
  bool primo = true;
	
  // vamos solicitar um número inteiro positivo
  cout << "Informe um número inteiro positivo: ";
  cin >> numero;
    
  // o número é negativo?
  if(numero < 0){
    cout << "Número inválido.\n\n";
  }
  // é 0 ou 1?
  else if((numero == 0) || (numero == 1)){
    cout << "Número válido, mas não é primo.\n\n";
  }
  // passou até aqui. Vamos testar se o número é primo
  else{
    for (int i = 2; i <= (numero / 2); i++){
      // se passar no teste, não é primo
      if (numero % i == 0) {
        primo = false;
        break;
      }
    }
      
    if(primo){
      cout << "O número informado é primo\n\n";
    }
    else{
      cout << "O número informado não é primo\n\n";
    }
  }
       
  system("PAUSE"); // pausa o programa
  return EXIT_SUCCESS;
}

Module Module1
  Sub Main()
    Dim principal As Double = 2000.0
    Dim taxa As Double = 0.08 '8%
    Dim meses As Integer = 2

    Dim juros As Double = principal * taxa * meses

    Console.WriteLine("O total de juros a ser pago é: " _
       & juros)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module

Module Module1
  Sub Main()
    Dim principal As Double = 2000.0
    Dim taxa As Double = 0.08 '8%
    Dim meses As Integer = 2

    Dim juros As Double = principal * taxa * meses
    Dim montante As Double = principal * (1 + (taxa * meses))

    Console.WriteLine("O total de juros a ser pago é: " _
       & juros)
    Console.WriteLine("O montante a ser pago é: " & montante)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module

Informe a quantidade de produtos vendidos: 950
O lucro da empresa foi: R$ 4500.0

package estudos;

import java.util.Scanner;

public class Estudos {
  public static void main(String[] args) {
    // variáveis usadas na resolução do problema
    int quant_produtos_vendidos;
    double lucro;
    
    // para ler a entrada do usuário
    Scanner entrada = new Scanner(System.in);
    
    // vamos pedir a quantidade de produtos vendidos
    System.out.print("Informe a quantidade de produtos vendidos: ");
    quant_produtos_vendidos = Integer.parseInt(entrada.nextLine());
    
    // vamos calcular o lucro da empresa
    lucro = (10 * quant_produtos_vendidos) - 5000;
    
    // e mostramos o resultado
    System.out.println("O lucro da empresa foi: R$ " + lucro);
  }
}

# precisamos importar os objetos BaseHTTPRequestHandler e HTTPServer
# do módulo http.server
from http.server import BaseHTTPRequestHandler, HTTPServer
# precisamos também do módulo time
import time

# vamos criar a classe ServidorWeb, que herda de
# BaseHTTPRequestHandler
class ServidorWeb(BaseHTTPRequestHandler):
  # vamos implementar o método que responde às requisições GET
  def do_GET(self):
    self.send_response(200)
    self.send_header("Content-type", "text/html")
    self.end_headers()
    self.wfile.write(bytes("<html><head><title>Meu Servidor Web</title></head>", 
      "utf-8"))
    self.wfile.write(bytes("<p>Requsição: %s</p>" % self.path, 
      "utf-8"))
    self.wfile.write(bytes("<body>", "utf-8"))
    self.wfile.write(bytes("<p>Exemplo de Web Server em Python</p>",
      "utf-8"))
    self.wfile.write(bytes("</body></html>", "utf-8"))

# função principal do programa
def main():
  # agora criamos um objeto HTTPServer
  host = "localhost"
  porta = 8080
  servidorWeb = HTTPServer((host, porta), ServidorWeb)
  print("Servidor iniciado em http://%s:%s" % (host, porta))

  # tentamos levantar o servidor
  try:
    servidorWeb.serve_forever()
  except KeyboardInterrupt:
    pass

  # liberamos o servidor web
  servidorWeb.server_close()
  print("O servidor web foi parado.")
  
if __name__== "__main__":
  main()

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;
}

// Vamos importar a biblioteca dart:io
import "dart:io";

// Classe usada para representar um ponto no
// plano 2d (Plano Cartesiano)
class Ponto{
  double x, y;
  
  // construtor da classe
  Ponto(double x, double y){
    this.x = x;
    this.y = y;
  }
}

void main(){
  // vamos construir os quatro pontos
  Ponto A = new Ponto(5, 7);
  Ponto B = new Ponto(9, -4);
  Ponto C = new Ponto(-8, 2);
  Ponto D = new Ponto(11, 6);
    
  // vamos obter a representação do segmento AB    
  double a1 = B.y - A.y;
  double b1 = A.x - B.x;
  double c1 = (a1 * A.x) + (b1 * A.y);
       
  // vamos obter a representação do segmento CD
  double a2 = D.y - C.y;
  double b2 = C.x - D.x;
  double c2 = (a2 * C.x) + (b2 * C.y);
    
  // obtém o determinante
  double determinante = (a1 * b2) - (a2 * b1);
    
  // as duas retas são paralelas?
  if(determinante == 0){
    print("\nAs duas retas são paralelas.\n");
  }
  else{
    // e construímos o ponto de intersecção
    double x = ((b2 * c1) - (b1 * c2)) / determinante;
    double y = ((a1 * c2) - (a2 * c1)) / determinante;
    Ponto inters = new Ponto(x, y);
    
    print("O ponto de interseção é: " + 
      "x = ${x.toStringAsFixed(2)}; y = ${y.toStringAsFixed(2)}");
  }
}

Informe o valor x da coordenada: 12
Informe o valor y da coordenada: -7
A coordenada (12,-7) está no Quarto Quadrante (+,-)

#include <stdio.h>
#include <stdlib.h>
#include <locale.h>

// função principal do programa
int main(int argc, char *argv[]){
  // variáveis usadas na resolução do problema
  int x, y;
  
  setlocale(LC_ALL,""); // para acentos do português
 
  // vamos pedir para o usuário informar as coordenadas
  printf("Informe o valor x da coordenada: ");
  scanf("%d", &x);
  printf("Informe o valor y da coordenada: ");
  scanf("%d", &y);
  
  // a coordenada está no primeiro quadrante? 
  if (x > 0 && y > 0){
    printf("A coordenada (%d,%d) está no Primeiro Quadrante (+,+)", x, y);
  }
  // a coordenada está no segundo quadrante?
  else if (x < 0 && y > 0){
    printf("A coordenada (%d,%d) está no Segundo Quadrante (-,+)", x, y);
  }
  // a coordenada está no terceiro quadrante?
  else if (x < 0 && y < 0){
    printf("A coordenada (%d,%d) está no Terceiro Quadrante (-,-)", x, y);
  }
  // a coordenada está no quarto quadrante?
  else if (x > 0 && y < 0){
    printf("A coordenada (%d,%d) está no Quarto Quadrante (+,-)", x, y);
  }
  // a coordenada está na origem
  else{
    printf("A coordenada (%d,%d) está na origem", x, y);
  }
  
  printf("\n\n");
  system("PAUSE");	
  return 0;
}