Question

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

Answer 1

Var
n:Integer;
Begin
 Writeln('Введите в градусах Цельсия');
 Read(n);
 Writeln('В Фаренгейтах это = ',(n*9/5)+32:0:1);
end.