1. Pascal / Говнокод #243

    −29.2

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    for i:=1 to n do
    begin
        j:=i;
        a:=b*exp((j-1)*ln(r));
    end;

    Задание геометрической прогрессии. Из решения школьной задачки.

    Запостил: guest, 22 Декабря 2008

    Комментарии (9) RSS

    • И что тут не понравилось?
      Ответить
    • Me:
      [quote=Говногость]Цитата[/quote]

      j:=i; наверное
      Ответить
    • Математику помню слабо, но наверное это возведение в степень...
      Ответить
    • облачко:
      это функция возрастания прогрессии вроде ) а что тут не так: )
      Ответить
    • Анонимус:
      Етишкина жизнь!
      "что тут не так"!
      Да ведь в геом. прогресси каждое следующее значение больше предыдущего в Q раз. Достаточно было
      b0 = ...;
      for ...
      b0 = b0 * Q;
      Ответить
    • Сан Саныч:
      Вроде бы похоже на истину, но эта(подобная) формула должна работать без цикла, а в цикле - просто фигня получается.
      Ответить
    • Artem:
      Есть один плюс у такого решения - нет накопления погрешности, но автор вряд ли это понимал.
      Ответить
    • sasha:
      это a = b*((j-1)^r)

      Artem
      +1
      Ответить

    Добавить комментарий