from datetime import datetime

def main():
  # Obtém um datetime da data e hora atual
  hoje = datetime.today()
 
  # Exibe a hora atual como um decimal
  print(hoje.strftime("A hora é: %I"))

if __name__== "__main__":
  main()

package estudos;

import java.awt.*;
import javax.swing.*;

public class Estudos extends JFrame{
  public Estudos() {
    super("A classe JPanel");
    
    Container c = getContentPane();
    Desenho desenho = new Desenho();
    c.add(desenho);

    setSize(350, 250);
    setVisible(true);
  }
  
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}

// Sub-classe de JPanel
class Desenho extends JPanel{
  public void paintComponent(Graphics g){ 
    super.paintComponent(g);
    
    // Define a cor de fundo
    setBackground(Color.YELLOW);
    
    // Desenha um quadrado na cor azul
    g.setColor(Color.BLUE);
    g.fillRect(10, 10, 100, 100);
  } 
}

// uma estrutura Pessoa
struct Pessoa
{
  char *nome;
  int idade;
};

// uma estrutura Pessoa
struct Pessoa
{
  char *nome;
  int idade;
}pessoa, cliente, chefe;

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

// uma estrutura Pessoa
struct Pessoa
{
  char *nome;
  int idade;
};

int main(int argc, char *argv[])
{
  // declara uma variável do tipo struct
  struct Pessoa cliente;
  cliente.nome = "Osmar J. Silva";
  cliente.idade = 36;

  // obtém os dados
  printf("O nome do cliente e: %s\n", cliente.nome);
  printf("A idade do cliente e: %d\n", cliente.idade);

  printf("\n\n");
  system("PAUSE");
  return 0;
}

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

int main(int argc, char *argv[])
{
  // nome e local do arquivo que será aberto para
  // obtermos a quantidade de linhas
  FILE *arquivo = fopen("c:\\testes.txt", "r");
  int caractere, existe_linhas = 0;
  int quant_linhas = 0;
  
  while((caractere = fgetc(arquivo)) != EOF){
    existe_linhas = 1; // há conteúdo no arquivo
    
    if(caractere == '\n'){ // é uma quebra de linha?
      // vamos incrementar a quantidade de linhas
      quant_linhas++;             
    } 
  }

  // se não houver uma quebra de linha na última linha
  // a contagem será sempre um a menos. Assim, é melhor
  // incrementar quant_linhas mais uma vez
  if(existe_linhas)
    quant_linhas++;

  // vamos exibir o resultado
  printf("O arquivo possui %d linhas.", quant_linhas);
  
  printf("\n\n");
  system("PAUSE");	
  return 0;
}

procedure TForm1.Button1Click(Sender: TObject);
var
  frase, substring: string;
begin
  frase := 'Programar em Delphi é muito bom';

  // vamos obter a substring "Delphi"
  substring := AnsiMidStr(frase, 14, 6);

  // vamos exibir o resultado
  ShowMessage('Resultado: ' + substring);
end;