ATIVIDADE 08 - PORTUGOL

8) Desenvolva um programa que leia uma distância em metros e mostre os valores
relativos em outras medidas.
Ex:
Digite uma distância em metros: 185.72
A distância de 85.7m corresponde a:
0.18572Km
1.8572Hm
18.572Dam
1857.2dm
18572.0cm
185720.0mm

programa {
  funcao inicio() {
    real metros, km, hm, ham, dm, cm, mm

    escreva("Digite uma distância em metros: ")
    leia(metros)

    km = metros/1000
    hm = metros/100
    ham = metros/10
    dm = metros*10
    cm = metros*100
    mm = metros*1000

    escreva("A distancia de ", metros," corresponde a: \n",km," km\n", hm," hm\n", ham," ham\n", dm," dm\n", cm," cm\n", mm," mm\n")

  }
}