algoritmo()
{
// exibe a tabuada, de 1 a 10, do numero informado
inteiro N; // o numero informado
inteiro i; // o multiplicador de 1 a 10
inteiro P; // o produto do numero pelo multiplicador
enquanto ( N <> -1 )
{
leia ( "informe o numero ou -1 p/ sair: ", N );
para ( i := 1 ate 10 passo 1 )
{
P := N * i;
escreva ( N, " x ", i, " = ", P );
}
}
}