Informe o valor para o índice 0: 84
Informe o valor para o índice 1: 23
Informe o valor para o índice 2: 9
Informe o valor para o índice 3: 5
Informe o valor para o índice 4: 11
Informe o valor para o índice 5: 3
Informe o valor para o índice 6: 50
Informe o valor para o índice 7: 7
Informe o valor para o índice 8: 2
Informe o valor para o índice 9: 73

O array informado foi:

84   23   9   5   11   3   50   7   2   73   

O array ordenado é:

2   3   5   7   9   11   23   50   73   84

# função principal do programa
def main():
  # vamos declarar e construir um vetor de 10 elementos
  valores = [0 for x in range(10)]
  	  
  # vamos pedir que o usuário informe os valores
  for i in range(0, len(valores)):
    valores[i] = int(input("Informe o valor para o índice {0}: ".format(i)))
    
  # vamos mostrar o vetor informado
  print("\nO array informado foi:\n\n")
  for i in range(0, len(valores)):
    print(valores[i], end="   ")
    
  # vamos ordenar os elementos do vetor usando a ordenação da bolha
  # laço externo de trás para frente
  for i in range(len(valores) - 1, 0, -1):
    for j in range(0, i): # laço interno vai no fluxo normal
      if valores[j] > valores[j + 1]: # temos que trocá-los de lugar 
        temp = valores[j]
        valores[j] = valores[j + 1]
        valores[j + 1] = temp
    
  # vamos exibir o vetor já ordenado
  print("\n\nO array ordenado é:\n\n")
  for i in range(0, len(valores)):
    print(valores[i], end="   ")
  
  print("\n")

if __name__== "__main__":
  main()

Dim numero As Integer = 0

Do While numero <= 10
  Console.WriteLine(numero)
  numero += 1
Loop

Dim numero As Integer = 10

Do While numero >= 0
  Console.WriteLine(numero)
  numero -= 1
Loop

Dim pode As Boolean = True
Dim valor As Integer = 1

Do While pode
  Console.WriteLine(valor)
  valor += 1

  If valor > 20 Then
    pode = False
  End If
Loop

<?
  // 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 
  }

  // obtém os nomes dos campos da tabela, seus tipos e 
  // detalhes adicionais
  $query = mysqli_query($con, "SHOW FULL COLUMNS FROM usuarios");
 
  // títulos da tabela HTML
  $titulos = array('Campo', 'Tipo', 'Collation', 'Null', 
    'Chave', 'Padrão', 'Extra');
 
  echo '<table border="1"><tr>';
  
  for($i = 0; $i < count($titulos); $i++){
    echo '<td>' . $titulos[$i] . '</td>'; 
  }    
   
  echo '</tr>';
 
  while($result = mysqli_fetch_array($query)){  
    echo '<tr>';
   
    for($i = 0; $i < count($titulos); $i++){
      echo '<td>' . $result[$i] . '&nbsp;</td>';     
    }   

    echo '</tr>';
  }
 
  echo '</table>';
  
  mysqli_close($con); // fecha a conexão 
?>

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos adicionar um novo item na PickList da primeira coluna
  DBGrid1.Columns[0].PickList.Add('40');
end;

procedure TForm3.Button3Click(Sender: TObject);
var
  i: Integer;
begin
  // vamos adicionar o conteúdo da PickList da primeira coluna
  // a um TMemo
  for i := 0 to DBGrid1.Columns[0].PickList.Count - 1 do
    begin
      Memo1.Lines.Add(DBGrid1.Columns[0].PickList[i]);
    end;
end;

# vamos criar um array de nomes
nomes = []

# Lê entrada até que o valor -1 seja
# fornecido
loop do
  print "Digite um nome (-1 para sair): "
  nome = gets.chomp
  
  # vamos adicionar este nome no final do
  # array
  if nome != "-1"
    nomes.push(nome) # adiciona o nome ao array
  end
  
  # vamos sair do laço se o valor for "-1"
  if nome == "-1"
    break
  end
end

# Exibe todos os valores do array
puts "\nOs nomes fornecidos foram:"
nomes.each do | nome |
  puts nome
end