COBOL è uno dei primi linguaggi di programmazione. Si distingue per le aziende Common Language Oriented, che specifica il suo uso principale nei sistemi di commercio, finanze ed amministrativi per le imprese e governi. COBOL moderna integra i concetti orientati agli oggetti nel suo linguaggio di programmazione, comprese le funzioni definite dall'utente, prototipi di chiamata e puntatori e la sintassi per ottenere la liberazione e lo stoccaggio. Le tecniche di programmazione comprendono sequenza, selezione e iterazione. Per il programma, è necessario scrivere dichiarazioni conformi alla sua sintassi.

istruzione

1 Fare clic su "Start", "Tutti i programmi" e "Microsoft Visual Studio 2010" per aprire l'ambiente di sviluppo integrato. Fai clic su "Nuovo" e "progetto" per entrare nella nuova finestra di dialogo progetto. Fai clic su "COBOL" e "nativo". Selezionare "Applicazione Console" come tipo di progetto. Inserire un nome per il progetto. Lasciare il percorso predefinito e il nome Solution. Fai clic su "OK".

2 Fai clic su "Program1.cbl" per accedere all'interfaccia codice. Il seguente codice è già stato aggiunto dall'IDE:
000100 IDENTIFICAZIONE DIVISIONE.
000200 PROGRAMMA-ID. Numero di calcolo.
Ci sono quattro divisioni in ogni programma COBOL: IDENTIFICAZIONE DIVISIONE, AMBIENTE DIVISIONE, DATI divisione e Procedura divisione. IDENTIFICAZIONE DIVISION contiene le informazioni per identificare il programma. PROGRAMMA-ID è obbligatoria, mentre il resto delle intestazioni sono opzionali.

3 Creare la Divisione:
DIVISIONE DEI DATI.
000.400 LAVORO-sezione Storage.
000500 01 WS-FIRST-NUMERO PIC 9 (3).
000600 01 WS-SECONDO-NUMERO PIC 9 (3).
000700 01 WS-TOTALE PIC ZZZ9.
000800 *
Tutti gli elementi di dati utilizzati nel programma devono essere specificati nella divisione dei dati. Questa divisione comprende file di sezione, LAVORO-CONSERVAZIONE e ATTACCO SEZIONE. Detto codice definisce tre variabili numero: Primo, secondo numero e totali.

4 Creare la PROCEDURE DIVISION:
000.900 PROCEDURA divisione.
001000 0000-MAINLINE.
001100 DISPLAY 'inserire un numero:'.
001200 ACCEPT WS-PRIMO NUMERO.
001.300
001.400 DISPLAY 'un altro numero:'.
001.500 ACCEPT WS-SECONDO-NUMERO.
001.600
001.700 COMPUTE WS-TOTALE = WS-PRIMO NUMERO + WS-SECONDO-NUMERO.
001.800 DISPLAY 'Il totale è:', WS-TOTALE.
001.900 STOP RUN.
La DIVISIONE PROCEDURA implementa la logica del programma. In questa procedura, il programma riceverà due numeri di ingresso da parte degli utenti e calcolare il totale e visualizzarlo.