Uses Crt;
Var
Nama, NIM, Alamat : String;
Begin
Clrscr;
Writeln ('Masukan NIM : '); Readln(NIM);
Writeln ('Masukan Nama : '); Readln(Nama);
WRiteln ('Masukan Alamat : '); Readln(Alamat);
Writeln ;
Writeln ('Nama Saya Adalah : ',Nama);
Writeln ('NIM Saya Adalah : ',NIM);
Writeln ('Alamat Saya Adalah : ',Alamat);
End.
Tidak ada komentar:
Posting Komentar