Sérgio Roberto Oliveira de Freitas

Portugol ex012

programa
{
inclua biblioteca Matematica –> m

funcao inicio()
{
real a
escreva(“Distância em metros: “)
leia(a)
escreva(“———-CONVERTENDO———-\n”)
real km=a/1000
escreva(“\n”,km, ” km”)
real hm=a/100
escreva(“\n”,hm, ” Hm”)
real dam=a/10
escreva(“\n”,dam, ” Dam”)
real dm=a*10
escreva(“\n”,dm, ” dm”)
real cm=a*100
escreva(“\n”,cm, ” cm”)
real mm=a*1000
escreva(“\n”,mm, ” mm”)
}
——————————————————————————————————————————————————
No sseu caso acima, parece que você copiou de um editor de textos que usa ASPAS DUPLAS diferentes do interpretado pelo software. Abaixo segue o resultado como as correções, obrigado por compartilhar, contribuiu muito para meu aprendizado.
——————————————————————————————————————————————————-
programa
{
inclua biblioteca Matematica –> m

funcao inicio()
{
real a, km, hm, dam, dm, cm, mm
escreva (“Distância em metros: “)
leia(a)
escreva (“———-CONVERTENDO———-\n”)
km = a/1000
escreva (“\n”,km, ” km”)
hm = a/100
escreva (“\n”, hm, ” Hm”)
dam = a/10
escreva (“\n”,dam, ” Dam”)
dm = a*10
escreva (“\n”,dm, ” dm”)
cm = a*100
escreva (“\n”,cm, ” cm”)
mm = a*1000
escreva (“\n”,mm, ” mm”)
}
}
———————-RESULTADO————————–
Distância em metros: 4287.35
———-CONVERTENDO———-

4.28735 km
42.87350000000001 Hm
428.735 Dam
42873.5 dm
428735.00000000006 cm
4287350.0 mm
Programa finalizado. Tempo de execução: 19230 milissegundos