program Zada4a_4; {$APPTYPE CONSOLE} var D,V,L:real; begin write('D=');readln(D); write('V=');readln(V); L:=(D*1000)/V; write('L=',L:5:2); readln; end.