Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  porcodio
Language: PASCAL
Code:
program HelloPeople;
var
  firstname    : string;
begin
  readln(firstname);

  for i := 1 to length(firstname) do begin
      writeln(firstname[i]);
  end 
end.          
Comments: