Cделать на языке паскаль

Улитка за день залезает вверх по дереву на V м, а за ночь спускается на U м. Высота дерева H м. За сколько дней D улитка поднимется на вершину дерева?

Question

Фасиля

5 марта, 02:47

+3

Ответы (1)

Знаете ответ?

Калман · Answer 1

Var

v, u, h, d, vp: longint;

begin

readln (v, u, h) ;

vp : = v - u;

d : = h div vp;

if (h mod vp 0) then

inc (d) ;

writeln (d) ;

end.