"""
  Este exemplo mostra como excluir e retornar
  um ítem aleatório em uma lista
"""
 
import random

def main():
  # cria uma lista de inteiros
  valores = [4, 23, 7, 1, 0, 54]
 
  # imprime a lista
  print(valores)
 
  # remove um ítem aleatório
  valor = valores.pop(random.randrange(0, len(valores)))
  print("Item removido:", valor)
 
  # exibe a lista novamente
  print(valores)

if __name__== "__main__":
  main()

package arquivodecodigos;

import java.util.*;
 
public class Estudos{
  public static void main(String[] args){
    Integer[] valores = new Integer[5];
  
    // inicializa os elementos do array
    valores[0] = 1;
    valores[1] = 2;
    valores[2] = 3;
    valores[3] = 4;
    valores[4] = 5;
     
    List lista = Arrays.asList(valores);
 
    // percorre a lista
    for(int i = 0; i < lista.size(); i++){
      Integer valor = (Integer)(lista.get(i));
      System.out.println(valor.toString());
    }
   
    System.exit(0);
  }
}

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;

<?php
  // Algoritmo que calcula porcentagem em PHP

  $valor = 178.00; // valor original
  $percentual = 15.0 / 100.0; // 15%
  $valor_final = $valor + ($percentual * $valor);

  // mostra o resultado
  echo "O valor final do produto é: " . $valor_final;

  // O resultado será 204,70
?>

<?php
  // Algoritmo que calcula porcentagem em PHP

  $valor = 250.00; // valor original
  $percentual = 8.0 / 100.0; // 8%
  $valor_final = $valor - ($percentual * $valor);

  // mostra o resultado
  echo "O valor final do produto é: " . $valor_final;

  // O resultado será 230,00
?>

<?php
  // Algoritmo que calcula porcentagem em PHP

  $perguntas = 90.0;
  $acertos = 72.0;

  // mostra a porcentagem de acertos
  echo "Porcentagem de acertos: " .
    (($acertos / $perguntas) * 100) . "%";

  // mostra a porcentagem de erros
  echo "<br>Porcentagem de erros: " .
    ((($perguntas - $acertos) / $perguntas) * 100) . "%";

  // Os resultados serão 80% e 20%
?>

<?php
  // Algoritmo que calcula porcentagem em PHP

  $valor_anterior = 300.0; // valor anterior
  $novo_valor = 340.0; // valor novo

  // calcula a porcentagem de lucro
  // efetua o cálculo
  $porcentagem_lucro = (($novo_valor * 100) / $valor_anterior) - 100;

  echo "A porcentagem de lucro foi de: " .
    $porcentagem_lucro . "%";

  // O resultado será 13,33
?>

<?php
  // Algoritmo que calcula porcentagem em PHP

  $valor = 70.0; // valor do produto
  $percentual = 5.0 / 100.0; // 5%

  // calcula a comissão
  $comissao = $percentual * $valor;

  // mostra o resultado
  echo "O valor repassado ao vendedor é: " .
    $comissao;

  // O resultado será 3,5
?>