fork(1) download
copy 
  1. IDENTIFICATION DIVISION.
  2. PROGRAM-ID. ADDITION.
  3. ENVIRONMENT DIVISION.
  4. DATA DIVISION.
  5. WORKING-STORAGE SECTION.
  6. 01 A PIC 99.
  7. 01 B PIC 99.
  8. 01 C PIC 999.
  9. PROCEDURE DIVISION.
  10. DISPLAY "ENTER A".
  11. ACCEPT A.
  12. DISPLAY "ENTER B".
  13. ACCEPT B.
  14. COMPUTE C=A+B.
  15. DISPLAY "SUM=",C.
  16. STOP RUN.
  17.  
  18.  
Success #stdin #stdout 0.01s 3996KB
comments (?)
stdin
copy 


			

					
			
			

				
	
		
		
	
		
		 stdout
					

				
				 copy
			

			
	

		
ENTER A
ENTER B
SUM=000


	

		
	 
	
	
			

					
			
			
			
			
			
			
			
			

			
			
			
		

	
		
		

			

			                        







			
			

				

	
					
					 https://ideone.com/qYwHa
					
					
					
					
					

												

												
						
						

					

					
					
					

						
language:

						
COBOL 85 (tinycobol-0.65.9)

					

					

						
created:
								
						
14 years ago

					

					

						
visibility:

						

							 public																												
							
							

								
							

						

					

										
										

					
					 Share or Embed source code
					
					
					
					

						
						
						
						
						
						
						
					

					
						
	
	
	
	
					
					
					
					
					 
					
					
					
					 
					
					
					
					
					
					

					

					

					
						
					

					


	
Discover > Sphere Engine API

	
The brand new service which powers Ideone!

	
	
Discover > IDE Widget

    
Widget for compiling and running the source code in a web browser!