program tcg;
var TC, TF: real;
begin
write('Введите значение температуры в градусах Цельсия: ');
read(TC);
TF := TC * 9 / 5 + 32;
writeln('Эта температура в градусах Фаренгейта: ', TF:5:1);
end.
program tcg;
var TC, TF: real;
begin
write('Введите значение температуры в градусах Цельсия: ');
read(TC);
TF := TC * 9 / 5 + 32;
writeln('Эта температура в градусах Фаренгейта: ', TF:5:1);
end.