COBOL - Funções intrínsecas - STANDARD-DEVIATION


Volta a página anterior

Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

COBOL - Funções intrínsecas - STANDARD-DEVIATION
Intrinsic functions - Enterprise COBOL for z/OS 6.3.0

A função "FUNCTION STANDARD-DEVIATION" retorna um valor numérico que é, aproximadamente, o DESVIO-PADRÃO.

argument-1
é um argumento numérico

Regras:

  • O tipo desta função é numérica.
  • O desvio-padrão é calculado da seguinte forma.
  1. Apuração da média aritmética dos argumentos.
  2. Subtração da média aritmética de cada um dos argumentos.
  3. O resultado de cada subtração é elevado ao quadrado.
  4. Esta resultados são somados e o total dividido pelo número de argumentos.
  5. Extração da raiz quadrada do quociente apurado no item 4.
  • Este valor é o valor obsoluto da raiz quadrada, que é o desvio-padrão.
  • Se houver somente um argumento, o desvio-padrão será zero (0).
  • Veja a função VARIANCE.
      *-----------------------------------------------------------------
       WORKING-STORAGE SECIOTN.
      *-----------------------------------------------------------------

       01  WS-AUXILIARES.  
           05  WS-ENTRADA                PIC X(021) VALUE SPACES. 
           05  WS-RESULTADO              PIC 9(005)V9(005).   

      *-----------------------------------------------------------------
       PROCEDURE DIVISION. 
      *-----------------------------------------------------------------
    
      * sintaxe do comando
COMPUTE WS-RESULTADO = FUNCTION STANDARD-DEVIATION (4 7 9 13) DISPLAY 'FUNCTION STANDARD-DEVIATION - ' WSS-RESULTADO * Resultado: FUNCTION STANDARD-DEVIATION - 00010,68750 COMPUTE WS-RESULTADO = FUNCTION STANDARD-DEVIATION (1 2 12) DISPLAY 'FUNCTION STANDARD-DEVIATION - ' WSS-RESULTADO * Resultado: FUNCTION STANDARD-DEVIATION - 00024,66667 COMPUTE WS-RESULTADO = FUNCTION STANDARD-DEVIATION (3 5 9) DISPLAY 'FUNCTION STANDARD-DEVIATION - ' WSS-RESULTADO * Resultado: FUNCTION STANDARD-DEVIATION - 00006,22222


© Copyright IBM Corp.