{print "something" three times}
program u43;
var countprinted:integer; {count of times "something" was printed}
begin

countprinted:=0;
while(countprinted <> 3) do begin
write('something');
writeln;
countprinted:=countprinted+1;
end;

end.