roman, Lua - rextester

roman

Language: Layout:

local numbers, chars, infamies = {1, 5, 10, 50, 100, 500, 1000}, {"I", "V", "X", "L", "C", "D", "M"}, {}
local function ToRomanNumerals(input)
    input = math.floor(tonumber(input) or 0)
    if input <= 0 then return input end
    local result = ""
    for i = #numbers, 1, -1 do
        while input - numbers[i] >= 0 and input > 0 do
            result = result .. chars[i]
            input = input - numbers[i]
        end
        for j = 1, i - 1 do
            if input - (numbers[i] - numbers[j]) >= 0 and input < numbers[i] and input > 0 and numbers[i] - numbers[j] ~= numbers[j] then
                result = result .. chars[j] .. chars[i]
                input = input - (numbers[i] - numbers[j])
                break
            end
        end
    end
    return result
end
for i = 0, 500, 1 do
    local num = ToRomanNumerals(i)
    table.insert(infamies, {i, num, string.len(num)})
end
table.sort(infamies, function(a, b) return a[3] < b[3] end)
local retard = { {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, }
for i, v in pairs(infamies) do
    table.insert(retard[v[3]],v)
end
local new_aids = {}
for i, v in pairs(retard) do
    table.sort(retard[i], function(a, b) return a[1] < b[1] end)
end
for i, v in pairs(retard) do
    print("----------------------------------")
    for ii,vv in pairs(v) do
        print(vv[1], vv[2], vv[3])
    end
end

[ + ] Show input
Absolute running time: 0.16 sec, cpu time: 0.01 sec, memory peak: 5 Mb, absolute service time: 0,28 sec

---------------------------------- 0 0 1 1 I 1 5 V 1 10 X 1 50 L 1 100 C 1 500 D 1 ---------------------------------- 2 II 2 4 IV 2 6 VI 2 9 IX 2 11 XI 2 15 XV 2 20 XX 2 40 XL 2 45 VL 2 49 IL 2 51 LI 2 55 LV 2 60 LX 2 90 XC 2 95 VC 2 99 IC 2 101 CI 2 105 CV 2 110 CX 2 150 CL 2 200 CC 2 400 CD 2 450 LD 2 490 XD 2 495 VD 2 499 ID 2 ---------------------------------- 3 III 3 7 VII 3 12 XII 3 14 XIV 3 16 XVI 3 19 XIX 3 21 XXI 3 25 XXV 3 30 XXX 3 41 XLI 3 46 VLI 3 52 LII 3 54 LIV 3 56 LVI 3 59 LIX 3 61 LXI 3 65 LXV 3 70 LXX 3 91 XCI 3 96 VCI 3 102 CII 3 104 CIV 3 106 CVI 3 109 CIX 3 111 CXI 3 115 CXV 3 120 CXX 3 140 CXL 3 145 CVL 3 149 CIL 3 151 CLI 3 155 CLV 3 160 CLX 3 190 CXC 3 195 CVC 3 199 CIC 3 201 CCI 3 205 CCV 3 210 CCX 3 250 CCL 3 300 CCC 3 401 CDI 3 405 CDV 3 410 CDX 3 451 LDI 3 455 LDV 3 460 LDX 3 491 XDI 3 496 VDI 3 ---------------------------------- 8 VIII 4 13 XIII 4 17 XVII 4 22 XXII 4 24 XXIV 4 26 XXVI 4 29 XXIX 4 31 XXXI 4 35 XXXV 4 42 XLII 4 44 XLIV 4 47 VLII 4 53 LIII 4 57 LVII 4 62 LXII 4 64 LXIV 4 66 LXVI 4 69 LXIX 4 71 LXXI 4 75 LXXV 4 80 LXXX 4 92 XCII 4 94 XCIV 4 97 VCII 4 103 CIII 4 107 CVII 4 112 CXII 4 114 CXIV 4 116 CXVI 4 119 CXIX 4 121 CXXI 4 125 CXXV 4 130 CXXX 4 141 CXLI 4 146 CVLI 4 152 CLII 4 154 CLIV 4 156 CLVI 4 159 CLIX 4 161 CLXI 4 165 CLXV 4 170 CLXX 4 191 CXCI 4 196 CVCI 4 202 CCII 4 204 CCIV 4 206 CCVI 4 209 CCIX 4 211 CCXI 4 215 CCXV 4 220 CCXX 4 240 CCXL 4 245 CCVL 4 249 CCIL 4 251 CCLI 4 255 CCLV 4 260 CCLX 4 290 CCXC 4 295 CCVC 4 299 CCIC 4 301 CCCI 4 305 CCCV 4 310 CCCX 4 350 CCCL 4 402 CDII 4 404 CDIV 4 406 CDVI 4 409 CDIX 4 411 CDXI 4 415 CDXV 4 420 CDXX 4 440 CDXL 4 445 CDVL 4 449 CDIL 4 452 LDII 4 454 LDIV 4 456 LDVI 4 459 LDIX 4 461 LDXI 4 465 LDXV 4 470 LDXX 4 492 XDII 4 494 XDIV 4 497 VDII 4 ---------------------------------- 18 XVIII 5 23 XXIII 5 27 XXVII 5 32 XXXII 5 34 XXXIV 5 36 XXXVI 5 39 XXXIX 5 43 XLIII 5 48 VLIII 5 58 LVIII 5 63 LXIII 5 67 LXVII 5 72 LXXII 5 74 LXXIV 5 76 LXXVI 5 79 LXXIX 5 81 LXXXI 5 85 LXXXV 5 93 XCIII 5 98 VCIII 5 108 CVIII 5 113 CXIII 5 117 CXVII 5 122 CXXII 5 124 CXXIV 5 126 CXXVI 5 129 CXXIX 5 131 CXXXI 5 135 CXXXV 5 142 CXLII 5 144 CXLIV 5 147 CVLII 5 153 CLIII 5 157 CLVII 5 162 CLXII 5 164 CLXIV 5 166 CLXVI 5 169 CLXIX 5 171 CLXXI 5 175 CLXXV 5 180 CLXXX 5 192 CXCII 5 194 CXCIV 5 197 CVCII 5 203 CCIII 5 207 CCVII 5 212 CCXII 5 214 CCXIV 5 216 CCXVI 5 219 CCXIX 5 221 CCXXI 5 225 CCXXV 5 230 CCXXX 5 241 CCXLI 5 246 CCVLI 5 252 CCLII 5 254 CCLIV 5 256 CCLVI 5 259 CCLIX 5 261 CCLXI 5 265 CCLXV 5 270 CCLXX 5 291 CCXCI 5 296 CCVCI 5 302 CCCII 5 304 CCCIV 5 306 CCCVI 5 309 CCCIX 5 311 CCCXI 5 315 CCCXV 5 320 CCCXX 5 340 CCCXL 5 345 CCCVL 5 349 CCCIL 5 351 CCCLI 5 355 CCCLV 5 360 CCCLX 5 390 CCCXC 5 395 CCCVC 5 399 CCCIC 5 403 CDIII 5 407 CDVII 5 412 CDXII 5 414 CDXIV 5 416 CDXVI 5 419 CDXIX 5 421 CDXXI 5 425 CDXXV 5 430 CDXXX 5 441 CDXLI 5 446 CDVLI 5 453 LDIII 5 457 LDVII 5 462 LDXII 5 464 LDXIV 5 466 LDXVI 5 469 LDXIX 5 471 LDXXI 5 475 LDXXV 5 480 LDXXX 5 493 XDIII 5 498 VDIII 5 ---------------------------------- 28 XXVIII 6 33 XXXIII 6 37 XXXVII 6 68 LXVIII 6 73 LXXIII 6 77 LXXVII 6 82 LXXXII 6 84 LXXXIV 6 86 LXXXVI 6 89 LXXXIX 6 118 CXVIII 6 123 CXXIII 6 127 CXXVII 6 132 CXXXII 6 134 CXXXIV 6 136 CXXXVI 6 139 CXXXIX 6 143 CXLIII 6 148 CVLIII 6 158 CLVIII 6 163 CLXIII 6 167 CLXVII 6 172 CLXXII 6 174 CLXXIV 6 176 CLXXVI 6 179 CLXXIX 6 181 CLXXXI 6 185 CLXXXV 6 193 CXCIII 6 198 CVCIII 6 208 CCVIII 6 213 CCXIII 6 217 CCXVII 6 222 CCXXII 6 224 CCXXIV 6 226 CCXXVI 6 229 CCXXIX 6 231 CCXXXI 6 235 CCXXXV 6 242 CCXLII 6 244 CCXLIV 6 247 CCVLII 6 253 CCLIII 6 257 CCLVII 6 262 CCLXII 6 264 CCLXIV 6 266 CCLXVI 6 269 CCLXIX 6 271 CCLXXI 6 275 CCLXXV 6 280 CCLXXX 6 292 CCXCII 6 294 CCXCIV 6 297 CCVCII 6 303 CCCIII 6 307 CCCVII 6 312 CCCXII 6 314 CCCXIV 6 316 CCCXVI 6 319 CCCXIX 6 321 CCCXXI 6 325 CCCXXV 6 330 CCCXXX 6 341 CCCXLI 6 346 CCCVLI 6 352 CCCLII 6 354 CCCLIV 6 356 CCCLVI 6 359 CCCLIX 6 361 CCCLXI 6 365 CCCLXV 6 370 CCCLXX 6 391 CCCXCI 6 396 CCCVCI 6 408 CDVIII 6 413 CDXIII 6 417 CDXVII 6 422 CDXXII 6 424 CDXXIV 6 426 CDXXVI 6 429 CDXXIX 6 431 CDXXXI 6 435 CDXXXV 6 442 CDXLII 6 444 CDXLIV 6 447 CDVLII 6 458 LDVIII 6 463 LDXIII 6 467 LDXVII 6 472 LDXXII 6 474 LDXXIV 6 476 LDXXVI 6 479 LDXXIX 6 481 LDXXXI 6 485 LDXXXV 6 ---------------------------------- 38 XXXVIII 7 78 LXXVIII 7 83 LXXXIII 7 87 LXXXVII 7 128 CXXVIII 7 133 CXXXIII 7 137 CXXXVII 7 168 CLXVIII 7 173 CLXXIII 7 177 CLXXVII 7 182 CLXXXII 7 184 CLXXXIV 7 186 CLXXXVI 7 189 CLXXXIX 7 218 CCXVIII 7 223 CCXXIII 7 227 CCXXVII 7 232 CCXXXII 7 234 CCXXXIV 7 236 CCXXXVI 7 239 CCXXXIX 7 243 CCXLIII 7 248 CCVLIII 7 258 CCLVIII 7 263 CCLXIII 7 267 CCLXVII 7 272 CCLXXII 7 274 CCLXXIV 7 276 CCLXXVI 7 279 CCLXXIX 7 281 CCLXXXI 7 285 CCLXXXV 7 293 CCXCIII 7 298 CCVCIII 7 308 CCCVIII 7 313 CCCXIII 7 317 CCCXVII 7 322 CCCXXII 7 324 CCCXXIV 7 326 CCCXXVI 7 329 CCCXXIX 7 331 CCCXXXI 7 335 CCCXXXV 7 342 CCCXLII 7 344 CCCXLIV 7 347 CCCVLII 7 353 CCCLIII 7 357 CCCLVII 7 362 CCCLXII 7 364 CCCLXIV 7 366 CCCLXVI 7 369 CCCLXIX 7 371 CCCLXXI 7 375 CCCLXXV 7 380 CCCLXXX 7 392 CCCXCII 7 394 CCCXCIV 7 397 CCCVCII 7 418 CDXVIII 7 423 CDXXIII 7 427 CDXXVII 7 432 CDXXXII 7 434 CDXXXIV 7 436 CDXXXVI 7 439 CDXXXIX 7 443 CDXLIII 7 448 CDVLIII 7 468 LDXVIII 7 473 LDXXIII 7 477 LDXXVII 7 482 LDXXXII 7 484 LDXXXIV 7 486 LDXXXVI 7 489 LDXXXIX 7 ---------------------------------- 88 LXXXVIII 8 138 CXXXVIII 8 178 CLXXVIII 8 183 CLXXXIII 8 187 CLXXXVII 8 228 CCXXVIII 8 233 CCXXXIII 8 237 CCXXXVII 8 268 CCLXVIII 8 273 CCLXXIII 8 277 CCLXXVII 8 282 CCLXXXII 8 284 CCLXXXIV 8 286 CCLXXXVI 8 289 CCLXXXIX 8 318 CCCXVIII 8 323 CCCXXIII 8 327 CCCXXVII 8 332 CCCXXXII 8 334 CCCXXXIV 8 336 CCCXXXVI 8 339 CCCXXXIX 8 343 CCCXLIII 8 348 CCCVLIII 8 358 CCCLVIII 8 363 CCCLXIII 8 367 CCCLXVII 8 372 CCCLXXII 8 374 CCCLXXIV 8 376 CCCLXXVI 8 379 CCCLXXIX 8 381 CCCLXXXI 8 385 CCCLXXXV 8 393 CCCXCIII 8 398 CCCVCIII 8 428 CDXXVIII 8 433 CDXXXIII 8 437 CDXXXVII 8 478 LDXXVIII 8 483 LDXXXIII 8 487 LDXXXVII 8 ---------------------------------- 188 CLXXXVIII 9 238 CCXXXVIII 9 278 CCLXXVIII 9 283 CCLXXXIII 9 287 CCLXXXVII 9 328 CCCXXVIII 9 333 CCCXXXIII 9 337 CCCXXXVII 9 368 CCCLXVIII 9 373 CCCLXXIII 9 377 CCCLXXVII 9 382 CCCLXXXII 9 384 CCCLXXXIV 9 386 CCCLXXXVI 9 389 CCCLXXXIX 9 438 CDXXXVIII 9 488 LDXXXVIII 9 ---------------------------------- 288 CCLXXXVIII 10 338 CCCXXXVIII 10 378 CCCLXXVIII 10 383 CCCLXXXIII 10 387 CCCLXXXVII 10 ---------------------------------- 388 CCCLXXXVIII 11