Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan...
Transcript of Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan...
![Page 1: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/1.jpg)
1
© Saifoe El Unas
Statetement input-output digunakan untuk
transfer data dari luar ke komputer (input data)
atau dari komputer ke perangkat (output data).
Input Data
memasukkan data input melalui keyboard atau
membaca dari suatu file.
Output Data
menampilkan data ke layar monitor, printer
atau menyimpan data dalam bentuk file.
Baik Input maupun Output dapat ditampilkan
dengan format tertentu atau tanpa format.
![Page 2: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/2.jpg)
2
Statement yang digunakan untuk input-output
adalah :
�Read
�Write
�Format
Catatan :
Format adalah statement yang digunakan
untuk menentukan format penulisan data,
banyak digunakan bersama Print dan Write,
bisa juga bersama Read.
![Page 3: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/3.jpg)
3
![Page 4: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/4.jpg)
4
A = 5.67
K = 8
PRINT *,A
PRINT *,K
PRINT *,A,K
END
5.670000
8
5.670000 8
A = 5.67
K = 8
PRINT 10,A,K
PRINT ”(1X,F4.2,5X,I1)”,A,K
10 FORMAT(1X,F4.2,5X,I1)
END
5.67 8
5.67 8
![Page 5: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/5.jpg)
5
REAL A,K
A = 5.67
K = 8
WRITE (*,*)A,K
END
5.670000 8.000000
![Page 6: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/6.jpg)
6
A = 5.67
K = -8
WRITE(*,10) A,K
WRITE(*,”(1X,’A = ‘,F4.2,5X,’K = ‘,I2)”) A,K
10 FORMAT(1X,’A = ‘,F5.2,5X,’K = ‘,I3)
END
A = 5.67 K = -8
A = 5.67 K = -8
![Page 7: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/7.jpg)
7
READ *,A,K
WRITE(*,10) A,K
10 FORMAT(1X,’A = ‘,F4.2,3X,’K = ‘,I2)
END
![Page 8: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/8.jpg)
8
PRINT “(1X,’A = ‘,\)”
READ *,A
PRINT “(1X,’K = ‘,\)”
READ *,K
WRITE(*,10) A,K
10 FORMAT(1X,’A = ‘,F4.2,5X,’K = ‘,I2)
END
• Data diinputkan dari keyboard diakhiri
dengan penekanan tombol Enter (� ).
• Beberapa data bisa diinputkan dalam satu
baris dengan diberi pemisah antar data
berupa : spasi atau koma atau tab.
• Input data character jika ada pemisah spasi
(seperti nama) harus menggunakan perintah
input dengan Format.
![Page 9: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/9.jpg)
9
CHARACTER*20 Nama
PRINT “(1X,’Masukkan nama anda : ‘,\)”
READ *,Nama
WRITE(*,*) Nama
END
rθ
![Page 10: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/10.jpg)
10
PROGRAM Luas Juring
Real r,teta,L,Pi
Pi = Asin(1.)*2
Print “(1x,’Jari-jari = ‘,\)”
Read *,r
Print “(1x,’Sudut (derajat) = ‘,\)”
Read *,teta
L = (teta/360)*Pi*r**2
Write(*,10)r,teta,L
10 Format(1x,’Luas juring dengan jari-jari = ‘,F6.2,’ dan sudut
= ‘,F6.2,’ adalah : ‘,F10.2)
END
A
Bα
![Page 11: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/11.jpg)
11
Semua jenis data input/output dapat ditampilkan
dalam bentuk file.
Keuntungan penggunaan file sebagai media
input/output :
• data tidak mudah hilang
• bisa diedit jika ada kesalahan ketik pada
saat input
• data dapat ditampilkan dalam format tertentu
sesuai dengan keinginan.
Selain PRINT, semua keyword input/output
dapat digunakan pada operasi file.
Operasi input/ouput data menggunakan file
seperti membaca/menulis buku yang terdiri dari:
• Membuka buku ≈ membuka file (OPEN)
• Membaca/menulis ≈ READ / WRITE
• Menutup buku ≈ menutup file (CLOSE)
Jadi pada operasi input/output melalui file
HARUS :
• Diawali dengan keywordOPEN
• Diakhiri dengan keyword CLOSE
![Page 12: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/12.jpg)
12
Bentuk sederhana :
OPENOPENOPENOPEN(NoUnit,File=‘NmFile’)
Keterangan :
• NoUnit : angka integer > 0, sebagai nomor
dari media input/output.
• NmFile : nama file yang menjadi media
input/output, ditulis diantara tanda petik
tunggal. Khusus untuk output printer dapat
digunakan ‘PRN’ sebagai nama file.
Bentuk sederhana :
CLOSECLOSECLOSECLOSE(NoUnit)
Keterangan :
• NoUnit : angka integer > 0, sebagai nomor
dari media input/output yang akan ditutup dan
telah ditetapkan pada statement OPEN.
![Page 13: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/13.jpg)
13
, dan
Ketentuan penulisan keyword READ untuk
input dari file hanya menggunakan bentuk II
seperti pada penjelasan sebelumnya dengan
mengisikan unit = nomor dari file yang sesuaipada statement OPEN.
Ketentuan penulisan keyword WRITE untuk
output ke file seperti juga pada penjelasan
sebelumnya dengan mengisikan unit = nomor
dari file yang sesuai pada statement OPEN.
Ketentuan penulisan keyword FORMAT =
penjelasan sebelukmnya.
![Page 14: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/14.jpg)
14
Bintang Kejora 87.00
CHARACTER*20 Nama
REAL Nilai
OPEN(1,File=’inputa.txt’)
READ(1,10) Nama,Nilai
PRINT “(1x,’Nama : ‘,A20)”,Nama
PRINT “(1x,’Nilai : ‘,F5.2)”,Nilai
10 FORMAT(A20, F5.2)
CLOSE(1)
END
![Page 15: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/15.jpg)
15
CHARACTER*20 Nama
REAL Nilai
PRINT “(1x,’Nama : ‘,\)”
READ “(A20)”,Nama
PRINT “(1x,’Nilai : ‘,\)”
READ *,Nilai
OPEN(2,File=’outputa.txt’)
WRITE(2,10) Nama,Nilai
10 FORMAT(’Nama : ‘,A20,/,’Nilai : ‘,F5.2)
WRITE(2,*)Nama
WRITE(2,*)Nilai
CLOSE(2)
END
![Page 16: Statetement input-output digunakan untuk transfer data dari ...Statetement input-output digunakan untuk transfer data dari luar ke komputer (input data) atau dari komputer ke perangkat](https://reader036.fdocument.pub/reader036/viewer/2022081403/609c5a357416ed57c6358f7c/html5/thumbnails/16.jpg)
16
A
B
α
? ?