Написать прогу, переводящую значения температуры из шкалы Цельсия в шкалы Фаренгейта и Кальвера( F=1.8*nградусов цельсия+32K=nградусов цельсия+273.15).В Pascal ABC.
Написать прогу, переводящую значения температуры из шкалы Цельсия в шкалы Фаренгейта и Кальвера( F=1.8*nградусов цельсия+32
K=nградусов цельсия+273.15).В Pascal ABC.
Гость
Ответ(ы) на вопрос:
Гостьvar k,c,f:integer;
begin
read(c);
f:=c*1.8+32;
k:=c+273.15
writeln('F=',f);
writeln('K=',k);
edn.
Не нашли ответ?
Похожие вопросы