Kashub's Code Barn - "kodzik"

program sygnalki;
uses dos,crt;
begin clrscr;
 
gotoxy(20,20);      {pierwszy szablon}
writeln('_');
 
gotoxy(19,21);
writeln('I');
 
gotoxy(21,21);
writeln('I');
 
gotoxy(20,22);
writeln('-');
 
gotoxy(19,23);
writeln('I');
 
gotoxy(21,23);
writeln('I');
 
gotoxy(20,24);
writeln('-');
 
gotoxy(19,25);
writeln('I');
 
gotoxy(21,25);
writeln('I');
 
gotoxy(20,26);
writeln('-');
 
repeat until keypressed;
end.

| Sklepy internetowe | | Sklep z oponami | | Opony zimowe | | karma dla psa - sklep | | Blog o książkach | | Gdzie przenieść blog za darmo? | | Wklejacz kodów | | Skracacz adresów | | Pionowe opisy |