значения мощности,измерянные в лошадиных силах,преобразуются в значения,измеренные в киловаттах (1 л. с.=0,735 кВт)
какое подробное задание!
Var lc:real; Begin write('Кол-во лошадиных сил = '); readln(lc); write(lc * 0.735); End.