Program convert;var sec, m, hour, km, option: real;begin readln(m, sec); km := m / 1000; hour := sec / 3600; option := km / hour; writeln('result hour: ',hour); writeln('result km: ', km); writeln(km,'/',hour,' = ',option);end.
//вроде то что ты просил