Beranda » Algoritma » Pascal » Contoh Penggunaan “Read/ReadLn”

Contoh Penggunaan “Read/ReadLn”

Selamat Datang

بِسْمِاللَّهِ الرَّحْمَنِ الرَّحِيمِ

Hai sahabat ... Selamat datang di Wisnurat's blog. Sedikit tulisan dan komentar yang mungkin asal-asalan, tapi mudah - mudahan deh bisa bermanfaat. Sebagai salam silaturahmi dengan senang hati kalau bisa tukaran link. Siapa tahu temen-teman yang lain juga ingin mampir ke blog sahabat. Terimakasih telah berkunjung. Jangan lupa mampir lagi ya... :)

Semua tulisan pada blog ini juga diposting pada blog okeguru.com

Masukkan alamat e-mail Anda untuk berlangganan blog ini dan menerima pemberitahuan tulisan-tulisan baru melalui email.

Bergabunglah dengan 13 pengikut lainnya

Blog Stats

  • 201,058 hits

Tamu

free counters

Traffic

Google PageRank Checker

Kumpulan contoh program PASCAL menggunakan “Read/ReadLn”

EXP – B1

PROGRAM Baca1;

{ —————————————— }

{ Contoh untuk menunjukan efek READ. }

{ —————————————— }

USES Crt;

VAR

DataA, DataB, DataC, : Integer;

BEGIN

ClrScr;

WriteLn(‘Masukan tiga buah bilangan Integer’) ;

WriteLn(‘Pisahkan dengan spasi’) ;

Read(DataA, DataB) ;

WriteLn(‘DataA = ‘, DataA) ;

WriteLn(‘DataB = ‘, DataB) ;

WriteLn(‘Masukan sebuah bilangan Integer’) ;

ReadLn(DataC) ;

WriteLn(‘DataC = ‘, DataC) ;

END.

EXP – B2

PROGRAM Baca2;

{ —————————————– }

{ contoh untuk menunjukan efek READLN. }

{ —————————————– }

USES Crt;

BEGIN

ClrScr;

WriteLn(‘Masukan tiga buah bilangan Integer’) ;

WriteLn(‘Pisahkan dengan spasi’) ;

ReadLn(DataA, DataB) ;

WriteLn(‘DataA = ‘, DataA) ;

WriteLn(‘DataB = ‘, DataB) ;

WriteLn(‘Masukan sebuah bilangan Integer’) ;

ReadLn(DataC) ;

WriteLn(‘DataC = ‘, DataC) ;

END.


3 Komentar

  1. irawan mengatakan:

    wiiis keren niih blog nya pak yuyus😀.

    klo ngeliat tutorialnya pascal jadi inget waktu masih sekolah belajar sama p defi & p yanto tapi nggak bisa-bisa truzz gara-garanya saya mah belok bukannya blajar pascal malah blajar html sendiri dari foto copyan nya p defi, tapi alhamdulillah ilmunya sampe skarang masih di pake😀

    seolah-olah kembali ke masa lalu ;))

    numpang aaah ;))
    sinzo.wordpress.com
    http://www.elixirbox.com

  2. irdha mengatakan:

    syukron…atas ilmu yang telah bpk berikan….semoga sukses terus…

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

Selamat Datang

بِسْمِاللَّهِ الرَّحْمَنِ الرَّحِيمِ

Hai sahabat ... Selamat datang di Wisnurat's blog. Sedikit tulisan dan komentar yang mungkin asal-asalan, tapi mudah - mudahan deh bisa bermanfaat. Sebagai salam silaturahmi dengan senang hati kalau bisa tukaran link. Siapa tahu temen-teman yang lain juga ingin mampir ke blog sahabat. Terimakasih telah berkunjung. Jangan lupa mampir lagi ya... :)

Semua tulisan pada blog ini juga diposting pada blog okeguru.com

Masukkan alamat e-mail Anda untuk berlangganan blog ini dan menerima pemberitahuan tulisan-tulisan baru melalui email.

Bergabunglah dengan 13 pengikut lainnya

%d blogger menyukai ini: