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

Create your online store today with Shopify

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

AFFILIATE MARKETING Your all-in-one performance engine Manage affiliates, creators, and customer referrals in one unified platform—turning every partnership into measurable growth

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

Most popular tags

python c java cpp c# javascript php vb# typescript nodejs go rust scala swift kotlin pascal html ruby dart vbnet r css bootstrap win32 groovy winapi sql mysql jquery pascal-string lua winforms kotlin-string cpp-string c-string swift-string bash go-string php-string c#-string java-string vbnet-string cobol python-string rust-string scala-string javascript-string cpp-vector pascal-array f# opengl typescript-string c-array swift-array php-array javascript-array rust-vector typescript-array python-list scala-array reactjs c-windows nodejs-string go-array nodejs-array kotlin-array sdl2 cpp-matrix cpp-array c-matrix sdl3 c#-list vbnet-list java-array pascal-matrix c#-array swift-matrix c#-matrix go-slice nodejs-express character-code-ascii-unicode kotlin-matrix typescript-matrix vbnet-array angularjs split-string-into-array-by-delimiter transpose-matrix binary-search-algorithm dot-product-two-arrays generate-random-floating-point-numbers all-permutations-combinations rust-matrix go-matrix kotlin-list get-n-digit-after-decimal-point-float swap-two-numbers-without-third swap-two-numbers mask-number-stars-except-last-4-digits remove-characters-first-string-from-second-string generate-8-digit-random-number
Disclosure: My content contains affiliate links.

43,568 questions

56,786 answers

573 users

How to divide variables in COBOL



724 views
asked Sep 18, 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. COBOL-PRO.
 
DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 A-NUM1 PIC 9(3) VALUE 17.
   01 A-NUM2 PIC 9(3) VALUE 5.
   01 A-NUM3 PIC 9(3) VALUE 13.
   01 A-NUM4 PIC 9(3) VALUE 22.

PROCEDURE DIVISION.
   DIVIDE A-NUM1 BY A-NUM2 GIVING A-NUM3 REMAINDER A-NUM4.

   DISPLAY "A-NUM1 : " A-NUM1
   DISPLAY "A-NUM2 : " A-NUM2
   DISPLAY "A-NUM3 : " A-NUM3
   DISPLAY "A-NUM4 : " A-NUM4

STOP RUN.
 
 
 
*> run:
*> 
*> A-NUM1 : 017
*> A-NUM2 : 005
*> A-NUM3 : 003
*> A-NUM4 : 002
*>

 



answered Sep 18, 2020 by avibootz
edited Jan 20, 2023 by avibootz
0 votes 
IDENTIFICATION DIVISION.
PROGRAM-ID. COBOL-PRO.
 
DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 A-NUM1 PIC 9(3) VALUE 17.
   01 A-NUM2 PIC 9(3) VALUE 173.

PROCEDURE DIVISION.
   DIVIDE A-NUM1 INTO A-NUM2.

   DISPLAY "A-NUM1 : " A-NUM1
   DISPLAY "A-NUM2 : " A-NUM2

STOP RUN.
 
 
 
*> run:
*> 
*> A-NUM1 : 017
*> A-NUM2 : 010
*>

 



answered Sep 18, 2020 by avibootz
edited Jan 20, 2023 by avibootz

Related questions

1 answer 217 views
217 views
How to move data between variables in COBOL
asked Oct 25, 2024 by avibootz
2 answers 432 views
432 views
How to subtract variables in COBOL
asked Sep 18, 2020 by avibootz
2 answers 468 views
468 views
How to add variables in COBOL
asked Sep 17, 2020 by avibootz
2 answers 456 views
456 views
How to multiply variables in COBOL
asked Sep 17, 2020 by avibootz
1 answer 370 views
370 views
How to initialize variables in COBOL
asked Sep 17, 2020 by avibootz
1 answer 379 views
379 views
How to use variables in COBOL
asked Sep 17, 2020 by avibootz
 | Search With Seek4Info.com
Powered by Question2Answer
...