var
w,v:array[0..10000] of int64;
f:array[0..10000] of real;
mv,t,i,j,k,m,n,max,len:longint;
x:real;
begin
assign(input,'convoy.in');
assign(output,'convoy.out');
reset(input);
rewrite(output);
readln(max,len,n);
for i:=1 to n do
readln(w[i],v[i]);
fillchar(f,sizeof(f),$7F);
f[0]:=0;
for i:=1 to n do
begin
t:=0;
mv:=v[i];
k:=i;
while (t+w[k]<=max)and(k>0) do
begin
t:=t+w[k];
if v[k]<mv then mv:=v[k];
x:=f[k-1]+len/mv;
if x<f[i] then f[i]:=x;
k:=k-1;
end;
end;
writeln((f[n]*60):0:1);
close(input);
close(output);
end.