(* Chapter 2 - Programming exercise 2 *)
program And_My_Name_Again;

begin
   Writeln('John Q. Doe ');
   Writeln('1234 Main Street ');
   Writeln('Littleberg, USA');
end.




{ Result of execution

John Q. Doe
1234 Main Street
Littleberg, USA

}