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

Question

Написать прогу, переводящую значения температуры из шкалы Цельсия в шкалы Фаренгейта и Кальвера( F=1.8*nградусов цельсия+32
K=nградусов цельсия+273.15).В Pascal ABC.

Answer 1

var k,c,f:integer;
begin
read(c);
f:=c*1.8+32;
k:=c+273.15
writeln('F=',f);
writeln('K=',k);
edn.