Pascal :

var i:integer;
begin
  for i:=1 to 5 do
   writeln('**********');
end.