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).
-----------

0 comments:

Post a Comment

Share

Twitter Delicious Facebook Digg Stumbleupon Favorites