Informe um caractere: A
Você informou o caractere: A
O código ASCII correspondente é: 65

package estudos;

import java.util.Scanner;

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 uma letra, símbolo ou pontuação
    System.out.print("Informe um caractere: ");
    
    // vamos ler o caractere informado
    char caractere = entrada.nextLine().charAt(0);
    
    // agora vamos obter o código ASCII correspondente
    int codigo = (int)caractere;
    
    // e mostramos o resultado
    System.out.println("Você informou o caractere: " + caractere);
    System.out.println("O código ASCII correspondente é: " + codigo);
  }
}

#include <iostream>

using namespace std;

int MDC(int a, int b){
  int resto;

  while(b != 0){
    resto = a % b;
    a = b;
    b = resto;
  }

  return a;
}

int main(int argc, char *argv[]){
   int x, y;

   cout << "Este programa permite calcular o MDC\n";
   cout << "Informe o primeiro valor: ";
   cin >> x;
   cout << "Informe o segundo valor: ";
   cin >> y;

   cout << "\nO Máximo Divisor Comum de "
     << x << " e " << y << " é " << MDC(x, y) << endl;

   system("PAUSE");
   return EXIT_SUCCESS;
}

bool pode = true;
bool vencido = false;

The name 'True' does not exist in the 
current context
The name 'False' does not exist in the 
current context

bool pode = true;
Console.WriteLine(pode);

Console.WriteLine("Um boolean ocupa " + sizeof(bool) +
  " bytes no C# 2.0");

Um boolean ocupa 1 bytes no C# 2.0

int pode = 1;

if(pode)
  Console.WriteLine("OK");

Cannot implicitly convert type 'int' to 'bool'

CREATE TABLE ALUNOS (
  ID          INTEGER NOT NULL,
  NOME        VARCHAR(40) NOT NULL,
  NASCIMENTO  DATE NOT NULL
);

INSERT INTO ALUNOS VALUES(1, 'OSMAR J. SILVA', '1981-11-28');

SELECT * FROM ALUNOS;

ID  NOME	     NASCIMENTO
1   OSMAR J. SILVA   28/11/1981

CREATE TABLE COMPROMISSOS (
  ID         INTEGER NOT NULL,
  DESCRICAO  VARCHAR(80) NOT NULL,
  DATA       DATE NOT NULL,
  HORA       TIME NOT NULL
);

INSERT INTO COMPROMISSOS VALUES(10, 'ALMOÇO COM A ESPOSA',
  '2010-12-10', '19:00:00');

SELECT * FROM COMPROMISSOS;

ID  DESCRICAO	          DATA	        HORA
10  ALMOÇO COM A ESPOSA	  10/12/2010	19:00:00

CREATE TABLE COMPROMISSOS (
  ID         INTEGER NOT NULL,
  DESCRICAO  VARCHAR(80) NOT NULL,
  DATA_HORA  TIMESTAMP NOT NULL
);

INSERT INTO COMPROMISSOS VALUES(20, 'ALMOÇO COM A ESPOSA', 
  '2010-10-23 19:00:00');

SELECT * FROM COMPROMISSOS;

ID  DESCRICAO	          DATA_HORA
20  ALMOÇO COM A ESPOSA	  23/10/2010 19:00:00

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

  // vamos definir o nome da chave a ser criada
  chave := 'Arquivo de Códigos';

  // 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 criar a chave informada
  if reg.CreateKey(chave) then
    begin
      ShowMessage('A chave foi criada com sucesso.');
    end
  else
    begin
      ShowMessage('Não foi possível criar a chave informada.');
    end;
    
  // vamos liberar o registro 
  reg.Free;
end;

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

  // vamos definir o nome da chave a ser criada
  chave := 'Simulador Nota Fiscal Eletrônica 1.0';

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

  // vamos criar uma chave dentro de HKEY_LOCAL_MACHINE\SOFTWARE
  reg.RootKey := HKEY_LOCAL_MACHINE;

  // vamos criar a chave informada
  if reg.CreateKey('\SOFTWARE\' + chave) then
    begin
      ShowMessage('A chave foi criada com sucesso.');
    end
  else
    begin
      ShowMessage('Não foi possível criar a chave informada.');
    end;
    
  // vamos liberar o registro 
  reg.Free;
end;