12 lines
411 B
Plaintext
12 lines
411 B
Plaintext
#include <mistral.h>
|
|
|
|
INICIAR:
|
|
TAMAÑO DE MEMORIA 20
|
|
temperatura=0, rankine=0
|
|
RECIBIR PARÁMETRO NUMÉRICO(2), GUARDAR EN (temperatura);
|
|
IMPRIMIR("KELVIN : ", temperatura, NL,\
|
|
"CELSIUS : ", {temperatura} MENOS '273.15', NL,\
|
|
"FAHRENHEIT : ", {temperatura} POR '1.8' ---RESPALDE EN 'rankine'--- MENOS '459.67', NL,\
|
|
"RANKINE : ", rankine, NL)
|
|
FINALIZAR
|