Advertisement
Guest User

1

a guest
Oct 17th, 2019
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. var
  2. n, a, b, x, y, z, f, e, m, s, t, c: real;
  3.  
  4. SpM: real;
  5.  
  6. begin
  7. read(c ,x, y, z, m, s, f, e, t);
  8.  
  9. a := ceil((e + 1) * f / s) * m + t;
  10.  
  11.  
  12. n := ceil((c - x) / z);
  13.  
  14. if n<0 then n:= 0;
  15.  
  16. b := ceil((c + n*y) / s) * m;
  17.  
  18. println(min(a, b));
  19.  
  20. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement