procedure TForm1.Button1Click(Sender: TObject);
var
  codigo: integer; 
  letra: char;
begin
  codigo := 65; // código ASCII

  // vamos obter o caractere
  letra := Chr(codigo);

  // vamos exibir o resultado
  ShowMessage('O caractere para o código informado é: '
    + letra);
end;

// função principal do programa Rust
fn main() {
  // vamos criar um array com 5 elementos
  let valores = [7, 3, 4, 9, 1];
  
  // agora vamos obter o tamanho do array
  let tamanho = valores.len();
  
  // e mostramos o resultado
  println!("O array possui {} elementos", tamanho);
}

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_NUM_LOCK)){
      System.out.println("Num Lock está ativado");
    }  
    else{
      System.out.println("Num Lock não está ativado");    
    } 

    System.exit(0);
  }
}

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

<?
  // constrói um novo objeto mysqli chamado conexao
  $conexao = new mysqli("localhost", "root",
    "osmar1234", "estudos");
 
  // testa se a conexão foi efetuada com sucesso
  if(mysqli_connect_errno()){
    die("Houve um erro de conexão: " . mysqli_connect_error());
  } 
  else{
    print "Conexão com " . $conexao->host_info 
      . " efetuada com sucesso.";
  } 

  // fecha a conexão com o banco de dados
  $conexao->close(); // fecha a conexão
?>