Wednesday, November 28, 20126:19 PM
TEKNIK PEMROGRAMAN TERSTRUKTUR 1
2KA20
ANGGOTA KELOMPOK
-
DESTY ANJARSARI
-
LEO PUTRA
-
MAISARAH
-
PIETRAJAYA
-
VIONA
1.
Lengkapi program di bawah ini:
IDENTIFICATION DIVISION.
PROGRAM-ID.
DIMENSI-1.
AUTHOR. MID.
ENVIRONMENT
DIVISION.
DATA DIVISION.
WORKING-STORAGE
SECTION.
01 DATA1.
02 I PIC 9(2).
02 NILAI PIC 9 OCCURS 10 TIMES.
02 J PIC 9(2).
SCREEN SECTION.
01 CLS.
02 BLANK-SCREEN.
PROCEDURE DIVISION.
AWAL.
DISPLAY CLS.
DISPLAY 'BANYAK DATA:'.
ACCEPT
J.
PERFORM ISI-DATA
VARYING I FROM 1 BY 1.
UNTIL I>J.
DISPLAY SPACE.
PERFORM TAMPIL-DATA.
VARYING I FROM 1 BY 1.
UNTIL I>J.
AKHIR.
STOP RUN.
ISI-DATA.
DISPLAY (,) 'NILAI KE-',I,'='.
ACCEPT NILAI (I).
TAMPIL-DATA.
DISPLAY (,) 'NILAI ANDA KE-',I,'='.
ACCEPT NILAI (I).
2. Isilah
sel-sel kosong di bawah ini! (jabarkan hasil perhitungannya)
a. SUBSTRACT
A FROM B GIVING C.
A
|
B
|
C
|
|
Sebelum
|
25
|
65
|
40
|
Sesudah
|
25
|
65
|
C=B-A=65-25=40
|
b. SUBSTRACT
A , 15 FROM 100 GIVING B.
A
|
B
|
|
Sebelum
|
25
|
15
|
Sesudah
|
25
|
B=100—15-25=60
|
c. ADD
A,B,C,10 TO D
A
|
B
|
C
|
D
|
|
Sebelum
|
20
|
30
|
40
|
50
|
Sesudah
|
20
|
30
|
40
|
D=D+10+A+B+C=50+10+20+30+40=150
|
d. MULTIPLY
A BY D GIVING C
A
|
C
|
D
|
|
Sebelum
|
24
|
2
|
5
|
Sesudah
|
24
|
2
|
C=A*D=24*5=120
|
e. DIVIDE
A BY B GIVING C
A
|
B
|
C
|
|
Sebelum
|
45
|
15
|
5
|
Sesudah
|
45
|
15
|
C=A/B=45/15=3
|
3. Isilah
titik – titik disebelah kanan dengan mencocokkan pilihan yang ada dibawah ini!
A. Kolom
1-6
B. IDENTIFICATION
DIVISION
C. Kolom
8-11
D. DATA
DIVISION
E. Kolom
12-72
F. PROCEDURE
DIVISION
G. Kolom
7
H. ENVIRONMENT
DIVISION
I. Kolom
73-80
J. OPEN
K. Data
Variabel
L. Data
Konstanta
M. Conditional
Statement
N. Level
number
O. Imperative
Statement
P. Level
number 77
Q. Level
number 66
R. Level
number 88
S. Level
number 01
T. Level
number 02-49
U. User
defined words
V. COBOL
reserved word
W. PIC Z
X. PIC X
Y. STOP
RUN
Z. REWRITE
AA. FILE
SECTION
BB.
CLOSE
CC. PERFORM
DD.
GO TO
EE. IF
FF. ACCEPT
GG.
DISPLAY
HH.
MOVE
II. WORKING
STORAGE SECTION
jawaban:
1. C..
disebut dengan AREA A
2. E..
disebut dengan AREA B
3. H..
Divisi yang kedua dari COBOL
4. V..
kata – kata yang berasal dari COBOL
5. M..
statement yang dilaksanakan sesuai dengan kondisi.
6. U..
Kata-kata yang didefinisikan oleh programmer.
7. K..
Data yang nilainya dapat berubah-ubah selama eksekusi.
8. G..
disebut dengan INDICATOR AREA
9. L..
Data yang nilainya tetap selam eksekusi.
10. EE..
digunakan untuk kondisi.
11. P..
level number yang berdiri sendiri
12. S...
level number untuk mengawali keterangan dari record.
13. W..
Picture editing yang digunakan untuk menghilangkan angak nol di depan.
14. Z..
digunakan untuk merekam ulang yang sudah pernah rekam
15. J..
digunakan untuk membuka file
16. BB..
digunakan untuk menutup file
17. AA..
menerangkan tentang file yang dipakai dalam pogram
18. GG..
untuk menampilkan hasil di layar untuk diprinter
19. Y..
untuk menghentikan program baik secara permanen atau sementara
20. CC/DD.. digunakan untuk proses prulangan
Labels: post: artikel bebas, post: TPT1, post: tugas
Post a Comment