Ok sobat Blogtekno,Kita awali coding dengan membuat program sederhana,yaitu program menghitung pengeluaran mahasiswa,berikut screnshootnya :
Berikut listing/script programnya :
Program Hitung_pengeluaran_Mahasiswa;
uses crt;
const
Jajan_per_Hari=20000;
var
Nama,NIM : string;
Har_Ma : longint;
Har_Mi : longint;
Peng_hari_ini : longint;
begin
clrscr;
gotoxy(10,1);writeln('------------------------------------------------------------------');
Gotoxy(10,2);writeln(' Menghitung Pengeluaran Mahasiswa');
gotoxy(10,3);writeln('------------------------------------------------------------------');
Gotoxy(10,4);write('Masukkan NIM Anda :');readln(NIM);
Gotoxy(10,5);write('Masukkan Nama :');readln(Nama);
Gotoxy(10,6);write('Harga Makanan :Rp.');readln(Har_Ma);
Gotoxy(10,7);write('Harga Minuman :Rp.');readln(Har_Mi);
Gotoxy(10,8);writeln('------------------------------------------------------------------');
{RUMUS}
Peng_hari_ini := Har_Ma + Har_Mi;
Gotoxy(10,11);write('Pengeluaran Hari Ini :Rp.',Peng_hari_ini);
Gotoxy(10,12);write('Sisa Uang Jajan :Rp.',Jajan_per_Hari);
Gotoxy(10,14);write('*****************INGATKI MENABUNG UNTUK MASA DEPANTA**************');
readln;
end.
*SELAMAT MENCOBA 
0 Response to "Membuat Program Sederhana Dengan Pascal"