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

  // vamos obter a data e hora atual
  data_hora := Now;

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

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

  // vamos abrir ou criar um nova chave
  if reg.OpenKey('Arquivo de Códigos', True) then
    begin
      // vamos atualizar ou criar uma chave contendo a data
      // e hora atual
      reg.WriteDateTime('Data e Hora', data_hora);
      reg.CloseKey; // grava a chave e a fecha
    end
  else
    begin
      ShowMessage('Não consegui abrir ou criar a chave informada');
    end;

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

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

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

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

  // vamos abrir a chave criada anteriormente
  if reg.OpenKey('Arquivo de Códigos', False) then
    begin
      // vamos obter a data e hora gravada anteriormente
      try
        begin
          data_hora := reg.ReadDateTime('Data e Hora');
          ShowMessage('A data e hora armazenada é: ' + DateTimeToStr(data_hora));
        end
      except
        ShowMessage('A sub-chave não foi encontrada ou não ' +
          'possui um valor do tipo TDateTime');
      end;

      reg.CloseKey; // fecha a chave
    end
  else
    begin
      ShowMessage('Não consegui abrir a chave informada');
    end;

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

Milhas		Quilômetros
-------------------------------
1		1.609
2		3.218
3		4.827
4		6.436
5		8.045
6		9.654
7		11.263
8		12.872
9		14.481
10		16.09

package estudos;

public class Estudos {
  public static void main(String[] args){
    System.out.println("Milhas\t\tQuilômetros");
    System.out.println("-------------------------------");

    // um laço for que repetirá 10 vezes
    for (int i = 1; i <= 10; i++){
      // usamos a variável de controle do laço para o cálculo
      System.out.println(i + "\t\t" + (i * 1.609));
    }
  }
}

<script type="text/javascript">
  function testar(valor, indice, vetor){
    if(valor > 70){
      return true;
    }
  }  

  var valores = new Array(21, 50, 30, 71, 12, 3);
  // vamos verificar se AO MENOS um valor é maior que 70
  var res = valores.some(testar);  
  window.alert("Alguns valores passaram no teste: " + res);
</script>

<?
  // vamos efetuar a conexão com o banco
  $con = new mysqli("localhost", "root",
    "osmar1234", "estudos");
 
  // conexão efetuada com sucesso?
  if($con->connect_errno){
    echo "Não foi possível efetuar a conexão: " . 
      $mysqli->connect_error;
    exit(); // vamos sair daqui 
  }   

  // lista todas as tabelas da base selecionada
  $query = mysqli_query($con, "SHOW TABLES");
  while($result = mysqli_fetch_array($query)){  
    echo $result[0] . "<br>";
  }
?>

package arquivodecodigos;

import java.io.*;
import java.util.*;

public class Estudos {
  static int indentLevel = -1;

  public static void main(String[] args) {
    listPath(new File("c:\\estudos_c"));
  }

  static void listPath(File path) {
    File files[];
    indentLevel++;

    files = path.listFiles();

    Arrays.sort(files);

    for (int i = 0, n = files.length; i < n; i++) {
      for (int indent = 0; indent < indentLevel; indent++) {
        System.out.print("  ");
      }
      
      System.out.println(files[i].getName());
      
      if(files[i].isDirectory()) {
        listPath(files[i]);
      }
    }
    indentLevel--;
  }
}

DICA.txt
estudos
  .vs
    estudos
      v16
        .suo
        Browse.VC.db
        ipch
          AutoPCH
            1dcb307edee5acf8
              ORIGEM.ipch
  Debug
    estudos.exe
    estudos.exe.recipe
    estudos.ilk
    estudos.log
    estudos.pdb
    estudos.tlog
      CL.command.1.tlog
      CL.read.1.tlog
      CL.write.1.tlog
      estudos.lastbuildstate
      link.command.1.tlog
      link.read.1.tlog
      link.write.1.tlog
    estudos.vcxproj.FileListAbsolute.txt
    Origem.obj
    vc142.idb
    vc142.pdb
  estudos.sln
  estudos.vcxproj
  estudos.vcxproj.filters
  estudos.vcxproj.user
  Origem.cpp
Estudos_C.dev
Estudos_C.exe
Estudos_C.layout
main.c
main.o
Makefile.win

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

int main(int argc, char *argv[])
{
  float principal = 2000.00;
  float taxa = 0.03; // 3%
  int meses = 3;

  float montante = principal * pow((1 + taxa), meses);
  float juros = montante - principal;

  printf("O total de juros a ser pago é: %f\n", juros);
  printf("O montante a ser pago é: %f", montante);

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

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

int main(int argc, char *argv[])
{
  float principal = 2000.00;
  float taxa = 0.03; // 3%
  int meses = 3;
  float anterior = 0.0;
  float montante;
  float juros;

  for(int i = 1; i <= meses; i++){
    montante = principal * pow((1 + taxa), i);
    juros = montante - principal - anterior;

    anterior += juros;

    printf("Mês: %d - Montante: %f - Juros %f\n", i, montante, juros);
  }

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