12 lines
388 B
Plaintext
12 lines
388 B
Plaintext
#include <mistral.h>
|
|
|
|
INICIAR:
|
|
TAMAÑO DE MEMORIA 15
|
|
temperatura=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' MENOS '459.67', NL,\
|
|
"RANKINE : ", {temperatura} POR '1.8', NL)
|
|
FINALIZAR
|