Resposta Exercício Pascal

Programa que imprimi números na tela:

Program impriminumeros ;

Begin

gotoxy (2,1);

write('1');

gotoxy (3,1);

write('2');

gotoxy (4,1);

write('3');

gotoxy (5,2);

write('4');

gotoxy (5,3);

write('5');

gotoxy (5,4);

write('6');

gotoxy (4,5);

write('7');

gotoxy (3,5);

write('8');

gotoxy (2,5);

write('9');

gotoxy (1,4);

write('10');

gotoxy (1,3);

write('11');

gotoxy (1,2);

write('12');

End.