Ответы и объяснения

Лучший Ответ!
2012-09-25T20:09:17+04:00

begin

uses crt;

textbackground(blue);

textcolor(blue);

writeln("*********");

write("*");

textbackground(green);

textcolor(green);

write("\     /");

textbackground(blue);

textcolor(blue);

writeln("*");

write("* ")

textbackground(green);

textcolor(green);

write("\   / ");

textbackground(blue);

textcolor(blue);

writeln("*");

write("*  ");

textbackground(red);

textcolor(red);

write("***  ");

textbackground(blue);

textcolor(blue);

writeln("*");

write("*  ");

textbackground(red);

textcolor(red);

write("* *  ");

textbackground(blue);

textcolor(blue);

writeln("*");

write("*  ");

textbackground(red);

textcolor(red);

write("***  ");

textbackground(blue);

textcolor(blue);

writeln("*");

write("* ")

textbackground(green);

textcolor(green);

write("/   \ ");

textbackground(blue);

textcolor(blue);

writeln("*");

write("*");

textbackground(green);

textcolor(green);

write("/     \");

textbackground(blue);

textcolor(blue);

writeln("*");

textbackground(blue);

textcolor(blue);

writeln("*********");

readln

end.