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

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

Boost your online presence with premium web hosting and servers

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 bash c-string swift-string cpp-string go-string php-string cobol c#-string java-string vbnet-string rust-string python-string cpp-vector f# opengl scala-string javascript-string pascal-array swift-array typescript-string c-array php-array javascript-array rust-vector typescript-array python-list reactjs scala-array c-windows nodejs-string go-array kotlin-array nodejs-array sdl2 sdl3 cpp-matrix cpp-array c#-list vbnet-list c-matrix pascal-matrix go-slice c#-array java-array nodejs-express character-code-ascii-unicode swift-matrix c#-matrix angularjs transpose-matrix binary-search-algorithm dot-product-two-arrays generate-random-floating-point-numbers all-permutations-combinations kotlin-matrix typescript-matrix vbnet-array kotlin-list calculate-volume-cube divide-given-amount-into-bills-coins convert-decimal-number-to-rational-number count-non-overlapping-instances-substring-in-string print-floyds-triangle case-insensitively-check-character-exists-in-string calculate-area-pentagon measure-function-execution-time sort-words-string
Disclosure: My content contains affiliate links.

42,641 questions

55,376 answers

573 users

How to accept a decimal number from a user and display the number in COBOL



149 views
asked Oct 25, 2024 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. INPUT_NUMBERS.
DATA DIVISION.
    WORKING-STORAGE SECTION.
        77 DECNUM  PIC 9(3).9(2).          
PROCEDURE DIVISION.
    ACCEPT DECNUM.                       
    DISPLAY DECNUM.              
STOP RUN.
 
 
*> STDIN
*>    312.95
 
 
*> run:
*>
*> 312.95
*>

 



answered Oct 25, 2024 by avibootz
edited Oct 25, 2024 by avibootz
0 votes 
IDENTIFICATION DIVISION.
PROGRAM-ID. INPUT_NUMBERS.
DATA DIVISION.
    WORKING-STORAGE SECTION.
        77 DECNUM  PIC 9999.999.                
PROCEDURE DIVISION.
    ACCEPT DECNUM.                       
    DISPLAY DECNUM.              
STOP RUN.
 
 
*> STDIN
*>    5012.861
 
 
*> run:
*>
*> 5012.861
*>

 



answered Oct 25, 2024 by avibootz

Related questions

1 answer 176 views
176 views
How to accept a string from a user and display the string in COBOL
asked Oct 24, 2024 by avibootz
1 answer 243 views
243 views
How to ACCEPT (input from user) a string in COBOL
asked Aug 26, 2022 by avibootz
1 answer 223 views
223 views
How to display a string in COBOL
asked Aug 26, 2022 by avibootz
1 answer 324 views
324 views
How to use number with sign in COBOL
asked Sep 17, 2020 by avibootz
 | Search With Seek4Info.com
Powered by Question2Answer
...