Search With Seek4Info.com
Welcome to collectivesolver - Programming & Software Q&A with code examples. A website with trusted programming answers. All programs are tested and work.

Contact: aviboots(AT)netvision.net.il

Semrush - keyword research tool

Turn ChatGPT, Claude, Gemini, And CoPilot Into Your Personal Assistant, Business Coach, Content Creator, And More

Secure & Reliable Web Hosting, Free Domain, Free SSL, 1-Click WordPress Install, Expert 24/7 Support

Boost your online presence with premium web hosting and servers

Children Learning Reading Phonics Foundations Reading Program

Most popular tags

python java c c# cpp javascript php vb# typescript nodejs go rust scala swift kotlin pascal html dart ruby r css bootstrap win32 groovy winapi sql mysql jquery pascal-string lua winforms kotlin-string bash swift-string c-string cpp-string go-string c#-string php-string java-string vbnet-string rust-string python-string cpp-vector f# vbnet opengl scala-string javascript-string pascal-array c-array swift-array cobol typescript-string php-array javascript-array rust-vector typescript-array python-list reactjs scala-array c-windows nodejs-string go-array kotlin-array nodejs-array sdl2 cpp-matrix c-matrix cpp-array c#-list vbnet-list pascal-matrix go-slice c#-array java-array nodejs-express character-code-ascii-unicode swift-matrix c#-matrix sdl3 angularjs generate-random-floating-point-numbers all-permutations-combinations kotlin-matrix typescript-matrix vbnet-array kotlin-list dot-product-two-arrays string-to-title-case create-infinite-loop rust-matrix go-matrix javascript-matrix raylib glfw represent-boolean-true-false different-functions-check-number-power-of-2 get-last-word-string remove-last-word-string
Disclosure: My content contains affiliate links.

40,764 questions

53,140 answers

573 users

How to multiply variables in COBOL



335 views
asked Sep 17, 2020 by avibootz
edited Sep 17, 2020 by avibootz
Share on
share on gp share on fb share on tw share on li share on re share via email

2 Answers

0 votes 
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 A-NUM1 PIC 9(4) VALUE 5.
   01 A-NUM2 PIC 9(4) VALUE 5.
   01 A-NUM3 PIC 9(4) VALUE 5.

PROCEDURE DIVISION.
   MULTIPLY A-NUM1 BY A-NUM2 A-NUM3.

   DISPLAY "A-NUM1 : " A-NUM1
   DISPLAY "A-NUM2 : " A-NUM2
   DISPLAY "A-NUM3 : " A-NUM3
   
STOP RUN.



# run:
# 
# A-NUM1 : 0005
# A-NUM2 : 0025
# A-NUM3 : 0025

 



answered Sep 17, 2020 by avibootz
0 votes 
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 A-NUM1 PIC 9(4) VALUE 5.
   01 A-NUM2 PIC 9(4) VALUE 5.
   01 A-NUM3 PIC 9(4) VALUE 5.

PROCEDURE DIVISION.
   MULTIPLY A-NUM1 BY A-NUM2 GIVING A-NUM3.

   DISPLAY "A-NUM1 : " A-NUM1
   DISPLAY "A-NUM2 : " A-NUM2
   DISPLAY "A-NUM3 : " A-NUM3
   
STOP RUN.



# run:
# 
# A-NUM1 : 0005
# A-NUM2 : 0005
# A-NUM3 : 0025

 



answered Sep 17, 2020 by avibootz

Related questions

1 answer 122 views
122 views
How to move data between variables in COBOL
asked Oct 25, 2024 by avibootz
2 answers 610 views
610 views
How to divide variables in COBOL
asked Sep 18, 2020 by avibootz
2 answers 312 views
312 views
How to subtract variables in COBOL
asked Sep 18, 2020 by avibootz
2 answers 351 views
351 views
How to add variables in COBOL
asked Sep 17, 2020 by avibootz
1 answer 274 views
274 views
How to initialize variables in COBOL
asked Sep 17, 2020 by avibootz
1 answer 278 views
278 views
How to use variables in COBOL
asked Sep 17, 2020 by avibootz
 | Search With Seek4Info.com
Powered by Question2Answer
...