N предметов дешевле одного другого на k%

(function() {
    'use strict';
    NAinfo.requireApiVersion(0, 2);
    let pr1, r1, r2, an;
    do {
        pr1 = sluchch(2, 30);
        r1 = sluchch(2, 6);
        r2 = sluchch(r1 + 2, 10);
        an = ((100 - pr1) * r2) / r1 - 100;
    } while ((an < 0) || (an.ceil() != an));

    let things = sklonlxkand([
        ['рубашка', 'куртка', 'футболка', 'шапка', 'платье', 'жилет', 'майка', 'шарф'],
        ['примочка', 'пиявка', 'зелье', 'отвар', 'жаба', 'порошок', 'амулет'],
        ['плед', 'одеяло', 'подушка', 'простыня', 'пододеяльник', 'матрас', 'дакимакура'],
        ['мишка', 'зайка', 'белочка', 'ёжик'],
    ]);
    let rand = sluchch(0, things.length - 1);
    let k = sluchch(0, things[rand].length - 1);
    let k1;
    do {
        k1 = sluchch(0, things[rand].length - 1);
    }
    while (k == k1);
    NAtask.setTask({

        text: `${chislitlx(r1,('плюшевых '.esli(rand==3)+`
        одинаковых `+things[rand][k].ie))} дешевле ${things[rand][k1].re} на ${pr1}\%.` +
        ` На сколько процентов таких же ${chislitlx(r2,things[rand][k].ie)} дороже ${things[rand][k1].re}?${things[rand][k].ie}`,
        answers: an,
    });
})();
//Обзад 106902