Program InputNama;

Var 
 Nama : String;
 
Begin 
 
  write('Masukkan Nama');
  readln(Nama);
  
  writeln('Halo Dunia, Nama');
  
End.