1. C++ / Говнокод #16709

    +57

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    void NestMathematica::DATABS(){
  int ks1 = 0;
  int ns1=0;
  int ns=0;
  ia=-1;
  ia=ia+1;
  b[ia]=-ak[0];
  ia=ia+1;
  b[ia]=alfa;
  mud=1;
  mld=1;
  if(ks!=1){
    ia=ia+1;
    b[ia]=0.;
    ks1=ks-1;
    for(int i=0; i<ks1; i++){
      ns1=ns;
      ns=ns+1;
      if(ns!=1){
        ia=ia+1;
        b[ia]=0.;
      }
      ia=ia+1;
      b[ia]=ak[ns1];
      ia=ia+1;
      b[ia]=0.;
      ia=ia+1;
      b[ia]=-ak[ns];
      ia=ia+1;
      b[ia]=0.;
      ia=ia+1;
      b[ia]=h[ns1];
      ia=ia+1;
      b[ia]=1.;
      ia=ia+1;
      b[ia]=0.;
      ia=ia+1;
      b[ia]=-1.;
      if(ns!=ks){
        ia=ia+1;
        b[ia]=0.;
      }
    }
    mud=2;
    mld=2;
    ia=ia+1;
    b[ia]=0.;
  }	//10
  if(beta<0){
    ia=ia+1;
    b[ia]=h[ks-1];
    ia=ia+1;
    b[ia]=1.;
  }else{
    ia=ia+1;
    b[ia]=ak[ks]+beta*h[ks];
    ia=ia+1;
    b[ia]=beta;
  }
  return;
}

    Программист на фортране может программировать на любом языке... как на фортране.

    Запостил: Abbath, 16 Сентября 2014

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

    • ava tirinox 17.09.2014 07:14 # +1

      Ему лет 60 уже, да?
      Ответить

      • ava Pythoner 17.09.2014 07:28 # +2

        Ему лет 15 от силы.
        Ответить

        • ava 1024-- 17.09.2014 08:20 # +1

          Ему же 57... Кстати, симметрично: появился в 57м, и сейчас ему 57.
          Ответить

          • ava bormand 17.09.2014 08:39 # 0

            > Ему же 57
            Откуда инфа?
            Ответить

            • ava 1024-- 17.09.2014 08:45 # 0

              С Википедии.
              Да, могло бы быть и 61, но у нас годы со дня рождения считают.
              Ответить

          • ava tirinox 17.09.2014 08:56 # +4

            Я про программиста :)
            А что, было бы забавно: программист и язык программирования появились одновременно, вместе росли, играли, учились :)
            Ответить

            • ava Abbath 17.09.2014 11:19 # 0

              Ты не очень далек от истины. Код переписан з кода на фортране многолетней давности.
              Ответить

    • ava gost 17.09.2014 09:34 # 0

      >>> ia=-1;
      >>> ia=ia+1;
      По-моему, это либо обфускация, либо просто кто-то писал код "от балды", чтобы на ГК залить.
      Ответить

      • ava eth0 17.09.2014 10:16 # +2

        Паста же.
        Тут на каждой "итерации" присвоения происходит инкремент.
        Если сначала присвоить ноль, использовать значение как индекс, не делая инкремента, выглядит некрасиво!
        Ответить

      • ava Abbath 17.09.2014 11:20 # +2

        Возможно в фортране индексация с 1. А это такой корявый порт на кресты.
        Ответить

    • ava movaxbx 17.09.2014 12:02 # +1

      DAT ABS
      Ответить

    • ava Elvenfighter 17.09.2014 12:40 # +5

      А по-моему это сказка про Винни-Пуха и его друзей на Фортране.
      Ответить

    • ava kegdan 18.09.2014 04:31 # +2

      Профессор Фортран атакуэ?
      Ответить

    • ava roman-kashitsyn 18.09.2014 08:09 # +3

      > mud
      всё верно.
      Ответить

    • ava guest 23.09.2014 22:51 # +1

      >ia=-1;
      >ia=ia+1;
      Глядя на сие, думал, то ли я дзен познал, то ли я попросту свихнулся.
      Ответить

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