Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  Predator1996
Language: PASCAL
Code:
program desenha_mascote_cor;
uses crt;
var cor:integer;
begin
write('Codigo de cor (0-15)');
readln(cor);
textbackground(cor);
ClrScr;
textcolor(12);
writeln('$ $');
writeln(' # ');
writeln('___');
textcolor(11);
writeln('0 0');
writeln(' $ ');
writeln('___');
readln;
end.


          
          
          
          
          
          
          
          
          
          
          
          
Comments: