помогите построить задачу Турбо паскаль "Построение домика" плиз

1
я жду////////////////////// срочно
пожалуйста

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

  • BiFi
  • отличник
2014-03-20T18:32:16+04:00
Program BiFi;
var i;integer;
Begin
writeln('       *       ');
writeln('      * *      ');
writeln('     *   *     ');
writeln('    *     *    ');
writeln('   *       *   ');
writeln('  *********  ');
for i:=1 to 5 do writeln('  *       *  ');
writeln('  *********  ');
readln;
 end.