# precisamos importar o módulo Math
import math

# função principal do programa
def main():
  # conjunto dos dados
  conjunto = [10, 30, 90, 30]
  soma = 0.0 # soma dos elementos
  desvio_padrao = 0.0 # desvio padrão
  tam = len(conjunto) # tamanho dos dados

  # vamos somar todos os elementos
  for i in range(0, tam):
    soma = soma + conjunto[i]
  
  # agora obtemos a média do conjunto de dados    
  media = soma / tam

  # e finalmente obtemos o desvio padrão
  for i in range(0, tam):
    desvio_padrao = desvio_padrao + math.pow(conjunto[i] - media, 2)
    
  # mostramos o resultado
  print("Desvio Padrão Populacional: {0}".format(math.sqrt(desvio_padrao / tam)))
  print("Desvio Padrão Amostral: {0}".format(math.sqrt(desvio_padrao / (tam - 1))))
  
if __name__== "__main__":
  main()

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      // cria uma matriz de duas dimensões: quatro linhas
      // e duas colunas
      int[,] matriz = new int[4, 2];

      // obtém a quantidade de dimensões
      int dimen = matriz.Rank;
      Console.WriteLine("Este array possui " + dimen + " dimensões.");

      Console.WriteLine("\n\nPressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

procedure TForm1.Button2Click(Sender: TObject);
begin
  // vamos selecionar o segundo item na ListBox
  ListBox1.ItemIndex := 1; // o índice do primeiro item é 0

  // note que este código não funciona para ListBoxes de
  // seleção múltipla
end;

def main():
  # cria uma lista de inteiros
  valores = [2, 5, 12, 2, 3, 32, 18]
 
  # exibe a lista na ordem original
  print(valores)
 
  # ordena a lista em ordem crescente
  valores.sort()
  # exibe a lista ordenada em ordem crescente
  print(valores)

  # ordena a lista em ordem decrescente
  valores.sort(reverse=True)
  # exibe a lista ordenada em ordem decrescente
  print(valores)

if __name__== "__main__":
  main()

procedure TForm1.Button1Click(Sender: TObject);
var
  ano, dias_ano: Integer;
begin
  ano := 2010;

  // vamos obter a quantidade de dias para o
  // ano de 2010
  dias_ano := DaysInAYear(ano);

  // exibe o resultado
  ShowMessage('O ano informado contém ' + IntToStr(dias_ano) +
    ' dias');
end;