program p2N1; {$APPTYPE CONSOLE} var a,k,l:real; begin writeln('vvedit dowzuny tsvyaha(sm)'); readln(l); writeln('vvedit skiki vin zaglubluetsya v derevo za 1 udar(sm)'); readln(k); a:=l/k; writeln('potribno ',a:5:0,' udariv dlya togo thob zabutu ves tsvyah'); readln; end.