while True do Writeln('SPAM');