Olá sou novo aqui poderia verificar se estar correto, exercicio 006.

programa
{

funcao inicio()
{
escreva(“{ EXERCICIO 006 – CONVERSOR DE MEDIDAS }\n”)
real m, res
escreva(“Distancia em metros: “)
leia(m)
res = m / 1000
escreva(res+” km\n”)
res = m / 100
escreva(res+ ” hm\n”)
res = m / 10
escreva(res+ ” dam\n”)
res = m * 10
escreva(res+ ” dm\n”)
res = m * 100
escreva(res+ ” cm\n”)
res = m * 1000
escreva(res+ ” mm\n”)

}
}