Сколько ячеек оперативной памяти нужно для записи слова стол

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

program ; var n : integer; begin    for n: = 10 to 99 do        if n mod 13 = 0 then writeln(n);     readln; end.