Program pr1;
var l, n: integer;
begin
writeln('Идите на длину, сколько распилов');
readln(l,n);
writeln('Средяя длина = ', l/n);
end.