Дано значение температуры T в градусах Фаренгейта. Определить значение этой же температуры в градусах Цельсия. (программа Паскаль)

var
TC, TF: real;

begin
writeln('Введите температуру в градусах Фаренгейта:');
write(' TF = ');
readln(TF);
TC := (TF - 32) * 5 / 9; { <-- температура по цельсию }
writeln;
writeln('Температура в градусах Цельсия:');
writeln(' TC = ', TC:0:2);
readln
end.