Сделайте программу, которая переводит значение температуры из градусов по шкале Цельсия

Для начала нам понадобится переменная, которая будет содержать значение температуры по шкале Цельсия. Назовем ее temperature_Cel.
Также нам нужна будет переменная, которая будет содержать значение температуры по шкале Фаренгейта. Назовем ее temperature_Far.
var temperature_Cel, temperature_Far: real;
begin
writeln(Задайте температуру по шкале Цельсия);
read(temperature_Cel);
Чтоб отыскать значение в другой шкале, мы умножим temperature_Cel на 9/5, а позже прибавим 32:
temperature_Far := temperature_Cel * 9/5 + 32;
Значение найдено. Завершаем программу словом end.