Cobol - Resolución operación exponencial

 
Vista:

Resolución operación exponencial

Publicado por Heisse (1 intervención) el 18/03/2021 20:45:39
Hola. Sabéis si.se puede con cobol resolver cálculos exponenciales? Por ejemplo:
(1 + x) ⁵
Hay sentencias para resolver estas operaciones? Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 17
Ha aumentado su posición en 3 puestos en Cobol (en relación al último mes)
Gráfica de Cobol

Resolución operación exponencial

Publicado por dario (4 intervenciones) el 20/03/2021 04:25:42
Espero esto te ayude.
Salu2.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
IDENTIFICATION DIVISION.
PROGRAM-ID. Operacion.
 
DATA DIVISION.
WORKING-STORAGE SECTION.
01  NUM1    PIC 9(5).
01  NUM2    PIC 9(5).
01  RESU    PIC 9(8).
01  EXPO    PIC 9(8).
 
PROCEDURE DIVISION.
MAIN.
    DISPLAY "Primer termino".
    ACCEPT NUM1.
    DISPLAY "Segundo Termino: "
    ACCEPT NUM2.
    DISPLAY "Exponente: "
    ACCEPT EXPO.
 
    COMPUTE RESU = (NUM1 + NUM2) ** EXPO
    DISPLAY "El resultado es " RESU.
 
    STOP RUN.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar