Question

Для перевода значения температуры по шкале цельсия в шкалу по фаренгейту используют формулу F=1,8с+32. Cоставьте программу в Паскалеabc, которая переводит температуру по шкале фаренгейта в цельсии

Answer 1

program FtoC;

var f,c:real;

begin

write('Градусы по шкале Фаренгейта -> ');

read(f);

c:=(f-32)/1.8;

write('=', c:8:2, ' по шкале Цельсия');

end.