Articles Comments

Belajar Untuk Berbagi » Pascal » Input Output Pascal

Input Output Pascal

program datapribadi;
uses crt;
var a,b,c,d,e,f,g,h,i,j:string;
begin
clrscr;
writeln(‘           .:: INPUT DATA SISWA::.      ‘);
writeln(‘========================================’);
write(‘Masukkan Nama Anda  : ‘);readln(a);
write(‘Masukkan NIS Anda   : ‘);readln(b);
write(‘Masukkan Kelas Anda : ‘);readln(c);
write(‘Masukkan Sekolah Anda:’);readln(d);
write(‘Masukkan Gender Anda: ‘);readln(e);
write(‘Masukkan Alamat : ‘);readln(f);
write(‘Masukkan Email/FB :’);readln(g);
write(‘Masukkan Hobby :’);readln(h);
write(‘Masukkan Makanan Favorit : ‘);readln(i);
write(‘Masukkan Cita-cita  : ‘);readln(j);
writeln(‘=======================================’);
writeln(‘ Nama Anda adalah :’,a);
writeln(‘ NIS              : ‘,b);
writeln(‘ KELAS             : ‘,c);
writeln(‘ SEKOLAH           : ‘,d);
writeln(‘ GENDER            : ‘,e);
writeln(‘ ALAMAT            : ‘,f);
writeln(‘ EMAIL/FB          : ‘,g);
writeln(‘ HOBBY             : ‘,h);
writeln(‘ MAKANAN FAVORIT   : ‘,i);
writeln(‘ CITA CITA         : ‘,j);
readln
end.

Setelah di save (dengan nama datapribadi.pas) di compile dan trus di run, hasilnya akan terlihat seperti dibawah ini :

dan setelah di tekan enter, hasilnya :

Mau Lihat Lebih...
Mau Lihat Lebih...

Written by

Filed under: Pascal · Tags:

Leave a Reply

*

*

You might also likeclose