Cделать на языке паскаль
Улитка за день залезает вверх по дереву на V м, а за ночь спускается на U м. Высота дерева H м. За сколько дней D улитка поднимется на вершину дерева?
Ответы
Ответ дал:
0
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.
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.
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад