Thursday, October 29, 2015

TUGAS X-TKJ.1

MEMBUAT BIODATA DENGAN PASCAL
-----------------------------------

Silahkan ketikan kode program berikut ini oleh kalian pada Program Pascal :
(Boleh di tulis jika praktek di LAB tidak memungkinkan).

program biodata;
uses crt;
var nm,kls,almt : string;

begin
writeln;
writeln ('---------INPUT BIODATA---------');
writeln;
write ('Masukan Nama : '); readln (nm);
write ('Masukan Kelas : '); readln (kls);
write ('Masukan Alamat : '); readln (almt);
writeln;
writeln ('Tekan Enter Sekali Lagi');
writeln ('Untuk Menampilkan Biodata Anda !');
readln;
writeln ('--------------------------------');
writeln ('Nama Anda Adalah .....>> ',nm);
writeln ('Anda Kelas............>> ',kls);
writeln ('Alamat Anda di........>> ',almt);
writeln ('--------------------------------');
writeln;
writeln ('Tekan Enter Untuk Keluar Program');
readln;
end.

----------
Sebagai latihan, buatlah sebuah Program Pascal "Input Data Nilai Siswa" dengan ketentuan sebagai berikut :
Data yang di input adalah 
- Nama Siswa
- Kelas
- Jurusan
- Nilai Tugas
- Nilai UTS
Setelah di input, tampilkan kembali data tersebut secara tersusun (Bisa ke bawah atau ke samping kanan satu baris).
-----------
Share:

0 comments:

Post a Comment

Definition List

Definition list
Consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Lorem ipsum dolor sit amet
Consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.

Alamat Kami

SADRAMMEDIA

Jl. Letkol Basir Surya

Lawang Condong Rt/Rw 002/001

Kel. Setianagara Kec. Cibeureum

Kota Tasikmalaya (46196)

Prov. Jawa Barat - Indonesia

Pages

Support

Ingin membuat Undangan yang Menarik, Terkini dan Berbeda?

Kami akan membuatkannya yang terbaik untuk Anda!

1. Undangan Berbasis Image Digital

2. Undangan Berbasis WEB

3. Undangan Berbasis Video Animasi

Hubungi Kami langsung Disini !