[Hunter US]

Я вот написал код программы и не знаю как его можно сделать продуктивней (как то с помощю циклов или как то иначе).
Помогите пожалуйста. Заранее спасбо.
Програма прилагается.

[Hunter US]

Вот програма.

[angvelem]

Код конечно радует:

Код:

   if i<i then ii:=0
      else if i=i then ii:=1
           else if i>i then ii:=2 ;

[Hunter US]

Это я чтобы понятнее,... и не наделать ошибок.

[angvelem]

Это шутка такая? Можешь объяснить, что этот код делает?

[Hunter US]

Вот я и говорю, сделать так чтобы это не казалось шуткой.
Код считает то что прилагалось в ексельовском документе (только там изначально условие уже посчитаное).

[angvelem]

Как, если неизвестно, что делается? И таких блоков в коде не один.

[Hunter US]

Вот что я пытаюсь сделать.
В задании присутствуют 4 експерта (последняя таблица) каждый выставил свой приоритет по разным критериям (I; C; P; N);
нужно конвертировать ети приоритеты в таблицу и по алгоритму найти самый важный критериям.

[Hunter US]

Вот ручной ращет.