<body><script type="text/javascript"> function setAttributeOnload(object, attribute, val) { if(window.addEventListener) { window.addEventListener('load', function(){ object[attribute] = val; }, false); } else { window.attachEvent('onload', function(){ object[attribute] = val; }); } } </script> <div id="navbar-iframe-container"></div> <script type="text/javascript" src="https://apis.google.com/js/platform.js"></script> <script type="text/javascript"> gapi.load("gapi.iframes:gapi.iframes.style.bubble", function() { if (gapi.iframes && gapi.iframes.getContext) { gapi.iframes.getContext().openChild({ url: 'https://www.blogger.com/navbar/7011465768390517193?origin\x3dhttp://the-ackerman.blogspot.com', where: document.getElementById("navbar-iframe-container"), id: "navbar-iframe" }); } }); </script>
wander;
POSTS
OWNER
LINKS
Credits
+ follow Dashboard
WELCOME.



← OlderNewer →
tugas TPT1
Wednesday, November 28, 20126:14 PM


TEKNIK PEMROGRAMAN TERSTRUKTUR 1
(COBOL)


 




KELAS : 2KA20
DISUSUN OLEH :

-          ASSYIFA F (11111265)
-          IRMA SEKARNINGRUM (13111699)
-          OSCAR NORIS EDYSON (18111569)
-          T. GANGGA LAKSAMANA (17111014)
-          YUNI PUTRI WULAN SARI (19111378)








SISTEM INFORMASI
FAKULTAS ILMU KOMPUTER DAN TEKNOLOGI INFORMASI
UNIVERSITAS GUNADARMA
OKTOBER 2012



ISI MATERI

A.      CODING


       IDENTIFICATION DIVISION.
       PROGRAM-ID. TUGAS1.
       AUTHOR. SAYA.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 INPUTAN.
          02 NAMA PIC X(20).
          02 KELAS PIC X(8).
          02 KAMPUS PIC X(25).
       SCREEN SECTION.
       01 HAPUS-LAYAR.
          02 BLANK SCREEN.
       PROCEDURE DIVISION.
       MULAI.
           DISPLAY 'NAMA :'.
           ACCEPT NAMA.
           DISPLAY 'KELAS :'.
           ACCEPT KELAS.
           DISPLAY 'KAMPUS :'.
           ACCEPT KAMPUS.
           DISPLAY HAPUS-LAYAR.
           PERFORM CETAK
           STOP "ENTER".
       SELESAI.
           STOP RUN.
       CETAK.
           DISPLAY '----------------------------'
           DISPLAY '      DATA MAHASISWA        '
           DISPLAY '----------------------------'
           DISPLAY 'NAMA : ', NAMA.
           DISPLAY 'KELAS: ', KELAS.
           DISPLAY 'KAMPUS: ', KAMPUS.
           DISPLAY '----------------------------'









B.  OUTPUT





C. FLOWCHART

 

Labels: , ,


Post a Comment