Дан список наименований товаров с указанием их цен на начало года. Известен уровень инфляции в процентах для каждого месяца года (взять значения от 0,5 до 2%). Рассчитать цены каждого товара на 1-е число каждого месяца и конец года, компенсирующие потери от инфляционного процесса.

поскольку язык не указан пишу в том который мне удобнее

def temp-table wares no-undo

field ware as char

field cost as dec extent 13

field infl as dec.

def var i as int.

def var infl as dec.

input from data. txt.

repeat:

create wares.

import wares.

end.

input close.

do i = 2 to 13:

infl=random (0.0005, 0.02).

for each wares:

wares. cost[i]=wares. cost[i-1] * (1+infl).

end.

end.