Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  drc_k_f
Language: PASCAL
Code:
program derece_cevrim;
var
  c ,k,f   : integer;
begin
  write('santigrad derece :?');
  Readln(c);
  k:=273 + c;
  write(c,' derece centigrade is equal to:');
  writeln(k,'derece kelvin');
  
  f:= c*1.8+32;
  write(c,' derece centigrade is equal to:');
  writeln(f,'derece fahrenheit');

readln;
end.        
Comments: