program kirjutaja;	{see rida ei tee midagi, kuid vana hea tava kohaselt}
	{lisatakse ta, et programmi teksti lugedes saaks aimu,}
	{ mis programmiga on tegemist.}

var
  s: string;
begin
  s:='päkapikk';
  writeln(s);
  writeln('Tere hommikust ', s);
end.