Uses crt;
Var
Nama, npm, kelas : string;
begin
clrscr;
write ( ‘nama :’ );
readln ( nama )
write ( ‘npm :’ );
readln ( npm );
write ( ‘kelas :’ );
readln ( kelas );
readln;
writeln ( ‘nama :’, nama );
writeln ( ‘npm :’, npm );
write ( ‘kelas :’, kelas );
readln;
End.
Output dari coding diatas adalah :
No comments:
Post a Comment