procedure TForm3.Button3Click(Sender: TObject);
var
  colunas: Integer;
begin
  // vamos obter a quantidade de colunas no DBGrid
  colunas := DBGrid1.Columns.Count;
  ShowMessage('O DBGrid possui ' + IntToStr(colunas) + ' colunas');
end;

package estudos;

import java.util.*;
import java.text.*;

public class Estudos{ 
  public static void main(String args[]){ 
    Calendar cal = Calendar.getInstance();
    Date data = cal.getTime();
    
    // formata e exibe a data e hora
    Format formato = new SimpleDateFormat(
      "dd/MM/yyyy - HH:mm:ss");
    System.out.println(formato.format(data));
  } 
}

procedure TForm3.Button5Click(Sender: TObject);
var
  reg: TRegistry;
begin
  // uses Registry

  // vamos criar uma instância da classe TRegistry
  reg := TRegistry.Create;

  // a chave raiz padrão é HKEY_CURRENT_USER mas, por via das dúvidas
  // vamos reafirmar isso
  reg.RootKey := HKEY_CURRENT_USER;

  // vamos verificar a existência de uma chave a partir da chave raiz
  if reg.KeyExists('Arquivo de Códigos') then
    begin
      ShowMessage('A chave pesquisada existe.');
    end
  else
    begin
      ShowMessage('A chave pesquisada não existe.');
    end;

  // vamos liberar o registro 
  reg.Free;
end;

<?
// vamos declarar o vetor
$pessoas = array();

// define o elemento no índice 0
$pessoas[] = "Osmar J. Silva";
 
// define o elemento no índice 1
$pessoas[] = "Salvador M. Andrade";
             
// define o elemento no índice 2
$pessoas[] = "Dyego Fernandes de Sousa";
 
// vamos mostrar o conteúdo do vetor
var_dump($pessoas);
?>

using System;
using System.Data;
using System.Windows.Forms;
using MySql.Data.MySqlClient;

namespace EstudosMySQL {
  public partial class Form1 : Form {
    public Form1() {
      InitializeComponent();
    }

    private void button1_Click(object sender, EventArgs e) {
      // objeto de conexão
      MySqlConnection conn = null;

      // string de conexão
      string connStr = "server=localhost;user id=root; " +
        "password=osmar1234; database=estudos; pooling=false";

      try {
        conn = new MySqlConnection(connStr);
        conn.Open();

        if (conn.State == ConnectionState.Open) {
          // primeiro criamos um novo objeto MySqlCommand
          MySqlCommand comando = new MySqlCommand();
          // definimos a conexão para este comando
          comando.Connection = conn;

          // definimos o comando SQL a ser executado 
          comando.CommandText = "INSERT INTO livros (id, titulo, " + 
            autor, paginas, data_cadastro) " +
            "VALUES(NULL, 'JAVA PARA INICIANTES', " + 
            "'OSMAR J. SILVA', 740, NOW())";
          
          // e executamos o comando SQL
          int res = comando.ExecuteNonQuery();
          if (res > 0) {
            MessageBox.Show("Operação realizada com sucesso. " 
              + res + " linhas afetadas.");
          }
          else {
            MessageBox.Show("Deve ter acontecido alguma coisa. " 
              + res + " linhas afetadas.");
          }
        }
      }
      catch (MySqlException ex) {
        MessageBox.Show("Erro: " +
          ex.Message);
      }
    }
  }
}

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      // vamos declarar e construir uma matriz de três linhas
      // e três colunas
      int[,] matriz = new int[3, 3];
      int soma_diagonal = 0; // guarda a soma dos elementos na diagonal
      // principal

      // vamos ler os valores para os elementos da matriz
      for (int i = 0; i < matriz.GetLength(0); i++) { // linhas
        for (int j = 0; j < matriz.GetLength(1); j++) { // colunas
          Console.Write("Informe o valor para a linha " + i + " e coluna "
            + j + ": ");
          matriz[i, j] = Int32.Parse(Console.ReadLine());
        }
      }

      // vamos mostrar a matriz da forma que ela
      // foi informada
      Console.WriteLine();
      // percorre as linhas
      for (int i = 0; i < matriz.GetLength(0); i++) {
        // percorre as colunas
        for (int j = 0; j < matriz.GetLength(1); j++) {
          Console.Write("   " + matriz[i, j]);
        }

        // passa para a próxima linha da matriz
        Console.WriteLine();
      }

      // vamos calcular a soma dos elementos da diagonal   
      // principal
      for (int i = 0; i < matriz.GetLength(0); i++) {
        for (int j = 0; j < matriz.GetLength(1); j++) {
          if (i == j) {
            soma_diagonal = soma_diagonal + matriz[i, j];
          }
        }
      }

      // finalmente mostramos a soma da diagonal principal
      Console.WriteLine("\nA soma dos elementos da diagonal principal é: "
        + soma_diagonal);
    
      Console.WriteLine("\n\nPressione qualquer tecla para sair...");
      // pausa o programa
      Console.ReadKey();
    }
  }
}

Informe o valor para a linha 0 e coluna 0: 3
Informe o valor para a linha 0 e coluna 1: 7
Informe o valor para a linha 0 e coluna 2: 9
Informe o valor para a linha 1 e coluna 0: 2
Informe o valor para a linha 1 e coluna 1: 4
Informe o valor para a linha 1 e coluna 2: 1
Informe o valor para a linha 2 e coluna 0: 5
Informe o valor para a linha 2 e coluna 1: 6
Informe o valor para a linha 2 e coluna 2: 8

   3   7   9
   2   4   1
   5   6   8

A soma dos elementos da diagonal principal é: 15

<?
  $valor = 1;
  
  while($valor <= 10){
    echo $valor . "<br>";
    $valor++;
  }
?>

<?
  $valor = 10;
  
  while($valor >= 1){
    echo $valor . "<br>";
    $valor--;
  }
?>

<?
  $continuar = true;
  $valor = 1;
  
  while($continuar){
    echo $valor . "<br>";
    $valor++;
	
    if($valor > 10)
     $continuar = false; // pára o laço
  }
?>

# vamos importar a biblioteca wxPython
import wx

class Janela(wx.Frame):
  def __init__(self):
    wx.Frame.__init__(self, None, -1, 
      "Usando wx.Button", size=(350, 200))
    
    # Cria um painel
    panel = wx.Panel(self)

    # Cria um botão e o adiciona no painel
    btn = wx.Button(panel, label="Clique Aqui", 
      pos=(10, 10), size=(100, 25))

    # Anexa um evento ao botão
    self.Bind(wx.EVT_BUTTON, self.OnBtnClick, btn)

  # Método que será chamado ao clicar o botão
  def OnBtnClick(self, event):
    dlg = wx.MessageDialog(None, "Você clicou no botão!",
      "Usando wx.Button", wx.OK | wx.ICON_INFORMATION)
    result = dlg.ShowModal()
    dlg.Destroy()

if __name__ == "__main__":
  app = wx.App()
  janela = Janela()
  janela.Show(True)
  app.MainLoop()

<?
  // informamos ao browser que o conteúdo é uma imagem PNG
  header("Content-type: image/png");
  // criamos uma imagem com largura de 200 e altura de 150 pixels
  $imagem = imagecreate(200, 150);
  // cor de fundo será azul
  $cor_fundo = imagecolorallocate($imagem, 0, 0, 255);
  // cor do texto será branca
  $cor_texto = imagecolorallocate($imagem, 255, 255, 255);
  // escrevemos na imagem
  imagestring($imagem, 3, 10, 10,  "Arquivo de Códigos", $cor_texto);
  // mandamos para o browser
  imagepng($imagem);
  // liberamos a memória
  imagedestroy($imagem);
?>

<img src="imagem.php">

// vamos declarar e construir um vetor (List) de 8 inteiros
List<int> valores = [0, 3, 0, 5, 7, 4, 0, 9];

Vetor na ordem original:

0   3   0   5   7   4   0   9   

Vetor com os zeros deslocados para o final:

3   5   7   4   9   0   0   0

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

void main(){
  // vamos declarar e construir um vetor (List) de 8 inteiros
  List<int> valores = [0, 3, 0, 5, 7, 4, 0, 9];
    
  // vamos mostrar o vetor na ordem original
  print("Vetor na ordem original:\n");
  for(int i = 0; i < valores.length; i++){
    stdout.write("${valores[i]}   ");
  }
    
  // vamos inicializar j como 0 para que ele aponte para
  // o primeiro elemento do vetor
  int j = 0;
    
  // agora o laço for percorre todos os elementos do vetor,
  // incrementanto a variável i e deixando o j em 0
  for(int i = 0; i < valores.length; i++){
    // encontramos um valor que não é 0
    if(valores[i] != 0){
      // fazemos a troca entre os elementos nos índices
      // i e j
      int temp = valores[i];
      valores[i] = valores[j];
      valores[j] = temp;
      // e avançamos o j para o elemento seguinte
      j++;
    }
  }
    
  // agora mostramos o resultado
  print("\n\nVetor com os zeros deslocados para o final:\n");
  for(int i = 0; i < valores.length; i++){
    stdout.write("${valores[i]}   ");
  }
}