Тут вообще есть программисты/математики?

[Diplomate 3,114]

Улитка ползёт по вертикальному шесту высотой h метров, поднимаясь за день на a метров, а за ночь спускаясь на b метров. На какой день улитка доползёт до вершины шеста?

Программа получает на вход натуральные числа h, a, b и должна вывести одно натуральное число. Гарантируется, что a>b.

При решении этой задачи нельзя пользоваться условной инструкцией if и циклами.

Задача не столько на программирование, сколько на умение составить правильную формулу. Мне необходимо решение этой задачи. Заведомо неверные решения не предлагать(h/(A-b}, к примеру). Если не понимаете, о чем тема — идите прочь и не разводите флуд. Интересно, есть ли тут хоть кто-нибудь, кто сможет решить даже эту "простую" задачу?

Изменено 26.11.2013, 12:37:53 пользователем Diplomate

[Diplomate 3,114]

Нет, именно H - A

Смотри, допустим нам нужно проползти 10 метров, при этом мы ползем днем по 3 метра вверх, а ночью по 2 метра нас сносит вниз.

То есть H = 10, A = 3, B = 2.

Вот таким вверх/вниз мы будем ползти первые 7 метров, потому как как только мы окажемся на 7 метрах или выше - за последний день мы проползем 3 метра и окажемся у точки без необходимости ждать ночи когда нас снесет.

То есть первые (10-3)=7 метров мы ползем методом "вверх/вниз", а последние 3 метра преодолеваем за последний день методом "только вверх"

То есть 10(H) - 3(A) = 7 (H-A)

h:=h-b;

v:=a-b;

s:=round(h/v+0.499999).

Вот этот вариант работает. У нас просто разные понимания ситуации. Этот способ тоже понял. Большое спасибо за помощь.

Ну вот. Ты даже таких элементарных вещей не знаешь.

Лол. И ты считаешь, что ты разобрался? Мне тебя стало жаль.

a=3, b=2, h=1. У тебя улитка на нулевой день доползает

h=4, b=6, a=7. А тут вообще на минус первый

Разборался он

Слушай, ты меня уже утомил. Ты хоть сам понял, что написал? Улитка в землю что ли проваливается? Условием гарантировались корректные значения переменных.

[Isaac New 3,552]

Условием гарантировались корректные значения переменных.

Условием гарантировалось, что a>b. Всё. Больше ничего в условии не было. Если бы ты умел читать - то увидел бы, что у меня в обоих случаях a>b. Уже по этой фразе видно, что ты ни капли не программист и ни одного нормального контеста (да что там контеста, ни одной нормальной задачи) у вас не было.

a=2, b=1, h=1 всё равно не подходит

[Diplomate 3,114]

Условием гарантировалось, что a>b. Всё. Больше ничего в условии не было. Если бы ты умел читать - то увидел бы, что у меня в обоих случаях a>b. Уже по этой фразе видно, что ты ни капли не программист и ни одного нормального контеста (да что там контеста, ни одной нормальной задачи) у вас не было.

a=2, b=1, h=1 всё равно не подходит

Хорошо, извини, тут ты действительно прав. Решение Detech'а в этом случае тоже не работает. Но решение, которое ты усиленно продвигаешь, вообще выдает в этом случае ошибку.

Изменено 27.11.2013, 11:36:16 пользователем Diplomate

[Isaac New 3,552]

Хорошо, извини, тут ты действительно прав. Решение Detech'а в этом случае тоже не работает. Но решение, которое ты усиленно продвигаешь, вообще выдает в этом случае ошибку.

Какое решение? Где я взял неполное частное вместо того, чтобы округлять вверх?

x:=округлитьвверх(h - a)/(a - ; //столько дней улитка проползёт по склону и сползёт вниз. Я не помню, как округление вверх делается в паскале. Со школы его не включал

y:=(x+abs(x))div2; //это мы сейчас учли, что улитке это могло не понадобиться, и если h<a - то x мы приняли за нуль. Отсюда, кстати, растёт условие не использовать условные операторы. Как хорошо, что паскаль сам умеет считать модуль числа

z:=y+1;

И последний день, когда улитка доползает до вершины шеста

Вот такое решение я продвигал изначально с поправкой на то, что из-за того, что мне на тебя и задачку твою было наплевать - округление стояло вниз, а не вверх. А округление вниз в данной ситуации - это чистый div

Изменено 27.11.2013, 13:03:21 пользователем Isaac New

[MAK 366]

var

a, b, h: integer;

begin

readln( h, a, b );

writeln(ceil( ( h - a ) / ( a - b ) ) + 1);

end.

----------------------

Функция: Ceil;

Модуль: Math;

Синтаксис: function Ceil(const X: Extended):Integer;

Описание: Округляет аргумент (Х) до наименьшего целого, превышающего или равного ему.

Изменено 27.11.2013, 13:40:44 пользователем MAK

[Freezze 1,445]

Если не ошибаюсь, то округлить вверх в Паскале можно следующим выражением: trunc(res)+1

Функция Trunc возвращает целую часть от деления.

Изменено 27.11.2013, 13:40:59 пользователем Freezze

[MAK 366]

Если не ошибаюсь, то округлить вверх в Паскале можно следующим выражением: trunc(res)+1

Функция Trunc возвращает целую часть от деления.

Этот вариант не подходит, т.к. если улитка доползает за один день (то есть res = 1), то по этой формуле мы получим ответ = 2.

[Diplomate 3,114]

var

a, b, h: integer;

begin

readln( h, a, b );

writeln(ceil( ( h - a ) / ( a - b ) ) + 1);

end.

----------------------

Функция: Ceil;

Модуль: Math;

Синтаксис: function Ceil(const X: Extended):Integer;

Описание: Округляет аргумент (Х) до наименьшего целого, превышающего или равного ему.

Это неверный вариант. У меня все точно так же, только без ceil. Он проходит все тесты, но вариант, предложенный Исааком, он не осиливает. Либо это недоработка тех, кто придумывал тесты к задаче, либо же предполагалось, что h>a.

Если не ошибаюсь, то округлить вверх в Паскале можно следующим выражением: trunc(res)+1

Функция Trunc возвращает целую часть от деления.

Нам нужно округлять вверх только дробные числа. Вариант detech'а(round(a+0.49999)) вполне работает.

Похоже, вариант Исаака самый работоспособный. Беру свои слова назад, спасибо на помощь. Непонятно, почему нельзя было помочь сразу, а нужно было разводить тут срач на несколько страниц про то, какой я дурак?

Изменено 27.11.2013, 14:06:03 пользователем Diplomate

[Isaac New 3,552]

Похоже, вариант Исаака самый работоспособный. Беру свои слова назад, спасибо на помощь. Непонятно, почему нельзя было помочь сразу, а нужно было разводить тут срач на несколько страниц про то, какой я дурак?

Я об этом написал с самого начала. Надо было попросить, а не потребовать. Когда приходит какой-то хрен с горы и начинает устанавливать свои порядки и что-то требовать - знаешь, очень хочется его послать по адресу

[Diplomate 3,114]

Я об этом написал с самого начала. Надо было попросить, а не потребовать. Когда приходит какой-то хрен с горы и начинает устанавливать свои порядки и что-то требовать - знаешь, очень хочется его послать по адресу

Я хотел пресечь флуд и оффтоп, чтобы не приходили всякие Трусайты и не превращали тему в бардак.

[Isaac New 3,552]

Я хотел пресечь флуд и оффтоп, чтобы не приходили всякие Трусайты и не превращали тему в бардак.

Запоминай слова: "Пожалуйста", "прошу", "без этих ваших подколов", "нашёл программу, но не могу правильно прочитать код", "не могли бы вы?"

[TrueSight 4,269]

Инфи совсем уже поехал, это задача для 3 класса, программист хренов.

Я превратил тему в бардак.

Изменено 27.11.2013, 16:55:42 пользователем TrueSight

[Diplomate 3,114]

Инфи совсем уже поехал, это задача для 3 класса, программист хренов.

Я превратил тему в бардак.

Такие высказывания неудивительны для "Эксперта в вещах, о которых он слышит первый раз." На самом деле, мне на такую недалекую личность, как ты, абсолютно наплевать. Умные люди объяснили мне смысл работы программы, и я вполне доволен.

Изменено 28.11.2013, 09:19:44 пользователем Diplomate

[TrueSight 4,269]

Такие высказывания неудивительны для "Эксперта в вещах, о которых он слышит первый раз." На самом деле, мне на такую недалекую личность, как ты, абсолютно наплевать. Умные люди объяснили мне смысл работы программы, и я вполне доволен.

Но факт остается фактом, задачка из довольно простых, ты бы смог с ней справиться, если бы прилагал мозг, если, конечно, у тебя нет с ним проблем.