Write a Prolog program to convert from Celsius to Fahrenheit

Write a Prolog program to convert from Celsius to Fahrenheit.

Solution

PROGRAM:

run :-
write(\'Enter the temperature in degrees Celsius \'), read(celsius),
convert(celsius,fahrenheit),
write(\'The temperature is \'), write(fahrenheit), write(\' Degrees Fahrenheit\'), nl,

convert(Cel, Fahr):-
Fahr is 9.0 / 5.0 * Cel + 32.