program ilu3; procedure printA; begin writeln(' * '); writeln(' * * '); writeln(' * * '); writeln(' ******* '); writeln('* *'); end; procedure printL; begin writeln('* '); writeln('* '); writeln('* '); writeln('* '); writeln('******'); end; begin printL; printA; printL; printA; printA; end.