Procedure de 1 até N.

Faça uma procedure que recebe, por parâmetro, um valor N e calcula e escreve a tabuada de 1 até N. Mostre a tabuada na forma:

1 x N = N 2 x N = 2N ... N x N = N2

Alguém me salva ai? Grato.