Question

Напечатать таблицу перевода температуры из градусов по шкале Цельсия(С) в градусы по шкале
Фаренгейта (F) для значений от 15 до 30 градусов С с шагом 10С. Перевод осуществляется по
формуле F=1,8C+32.

Answer 1

program temp4;

var

i:integer;

c,f:real;

begin

c:=15;

writeln(' C F');

while c<30 do

begin

writeln(c:5:1,1.8*c+32:5:1);

c:=c+0.1

end

end.