program loop; begin while(true) do Writeln ('ola mundo'); end.