Все отдельно посчитал но без таблицы, сам(а) нарисуешь все посчитал
Ещё 19 рублей прибавь к итоговой сумме и к консервам ещё 250г и их цене
5 - поля данных без рисунка, на графике это 4 - представление этих данных в графическом виде
Var rast,summa:real;
k:integer;
begin
rast:=10;
summa:=10;
for k:=2 to 7 do
begin
rast:=rast+rast/10;
summa:=summa+rast;
end;
writeln(summa);
<span>end.</span>