Нужна таблица можно побыстрее даю

Романтика, аниматор, форманта, романтик, иномарка, фанариот, Митрофан, наркомат,камфора, натирка, каротин, тиранка, фонарик, Кириана, инфаркт, картина, ритмика,Никифор, марафон, Матрона, маринка, макитра, формиат, , трофика, маниока, комната,мартини, , антимир, матрона, окраина, фанатик, акроним, миканит, октарин, формант,намотка, аромат, мантра, фианит, Африка, кантор, Анфима, катион, микрон, фантик,тарник, кианит, фортка, комара, ратник, нарком, арника, камора, анатом, кармин,фактор, морфин, фоника, аконит, мирика, Никита, ракита, трафик, картон, форинт,кифара, Марина, афронт, кантри, Трифон, фирман, иранка, катран, формат, кафтан,тонарм, фантом, тиамин, Трофим, каинит, тоника, фараон, Карина, Моника, Мартин,амфора, карман, нотка, ринит, фомка, франт, Марфа, морфа, антик, Коран, матка,фанат, канат, мирка, танка, трико, финик, корма, мотка, октан, форма, Макар,мирок, рамка, томик, актор, Мирон, тариф, Ирина, кафир, кофта, марка, накат,роман, митра, фитин, минор, тоник, икота, карат, норка, тиара, Фаина, Аарон,Марта, отара, карма, манок, факир, нарта, ротик, франк, манто, тиран, крона,фиакр, фронт, интим, карта, маори, Марат, мотик, ритон, Афина, макар, нимфа,финка, катар, Мотра, рифма, фанки, актин, коата, мирон, нитка, таран, аорта,Томна, фанта, амати, икаит, ранка, Тарка, Марка, Роман, икона, комар, ратин,Арина, нарик, манка, норма, аркан, камин, инока, мора, факт, крон, така, торн,Рита, аком, арфа, крот, Мира, Ника, рака, трак, фтор, мара, окра, тмин, фора,рама, фанк, кмин, Тара, трио, финт, Ирак, мрак, фант, афта, каон, коиф, рана,трок, фирн, Мина, ИКАО, Кара, кома, нора, рант, арат, Каин, Нара, фара, арка,Кама, Кима, фарт, нота, тина, Фома, киот, Крит, тори, фата, морф, ринк, Аким,Арон, Кира, мира, натр, торф, кора, окат, ритм, атом, кана, танк, фиат, корм,кант, миро, рами, тара, корт, маки, РАМН, кофр, Марк, мина, омар, кара, Мана,мирт, нома, трон, фита, арак, кран, оним, форт, амин, Нора, крат, март, икра,Фока, кино, крин, мион, офит, рота, тора, фрак, тир, кир, Мир, рак, кор, фан,Кан, тан, мот, акр, ион, кат, риф, Ток, акт, кот.
НОРМАЛЬНО?

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
  for var i:=1 to 1000 do
    if i mod 7 =0 then print(i);
end.

Тестовое решение:
7 14 21 28 35 42 49 56 63 70 77 84 91 98 105 112 119 126 133 140 147 154 161 168 175 182 189 196 203 210 217 224 231 238 245 252 259 266 273 280 287 294 301 308 315 322 329 336 343 350 357 364 371 378 385 392 399 406 413 420 427 434 441 448 455 462 469 476 483 490 497 504 511 518 525 532 539 546 553 560 567 574 581 588 595 602 609 616 623 630 637 644 651 658 665 672 679 686 693 700 707 714 721 728 735 742 749 756 763 770 777 784 791 798 805 812 819 826 833 840 847 854 861 868 875 882 889 896 903 910 917 924 931 938 945 952 959 966 973 980 987 994