; Vamos definir as variáveis que vamos
; usar no programa
(defvar numero)
(defvar raiz)

; Este o programa principal
(defun RaizQuadrada()
  ; Vamos ler o número
  (princ "Informe um número: ")
  ; talvez o seu compilador não precise disso
  (force-output)
  ; atribui o valor lido à variável numero
  (setq numero (read))
  
  ; calcula a raiz quadrada do número informado
  (setq raiz (sqrt numero))
  
  ; E mostramos o resultado
  (format t "A raiz quadrada de ~F é ~F" numero
    raiz)
)

; Auto-executa a função RaizQuadrada()
(RaizQuadrada)

; variáveis que vamos usar no programa
(let ((frase)(substring))
  ; Vamos pedir para o usuário informar
  ; uma frase
  (princ "Informe uma frase: ")
  ; talvez o seu compilador não precise disso
  (force-output)
  ; atribui o valor lido à variável frase
  (setq frase (read-line))
  
  ; vamos mostrar a frase informada
  ; o símbolo ~% provoca uma quebra de linha
  (format t "A frase informada foi: ~S~%" frase)
  
  ; agora vamos obter os 5 primeiros caracteres
  (setq substring (subseq frase 0 5))
  
  ; e mostramos a substring
  (format t "A substring obtida foi: ~S" substring)
)

package arquivodecodigos;

public class Estudos{
  public static void main(String args[]){
    // conjunto dos dados
    double conjunto[] = {10, 30, 90, 30};
    double soma = 0.0; // soma dos elementos
    double desvioPadrao = 0.0; // desvio padrão
    int tam = conjunto.length; // tamanho dos dados

    // vamos somar todos os elementos
    for(int i = 0; i < tam; i++){
      soma = soma + conjunto[i];
    }

    // agora obtemos a média do conjunto de dados    
    double media = soma / tam;

    // e finalmente obtemos o desvio padrão
    for(int i = 0; i < tam; i++){
      desvioPadrao = desvioPadrao + Math.pow(conjunto[i] - media, 2);
    }
    
    // mostramos o resultado
    System.out.println("Desvio Padrão Populacional: " + 
      Math.sqrt(desvioPadrao / tam));
    System.out.println("Desvio Padrão Amostral: " + 
      Math.sqrt(desvioPadrao / (tam - 1)));
  }
}