var i:byte;
    
begin
i:=0;
Writeln('       Градусы');
writeln('Цельсия        Фаренгейта');
while i<=30 do begin
writeln('   ',i,'    ','         ',1.8*i+32  );
i:=i+2;
end;
end.