Создание сцен и рисунков , потом анимация. Т.к. что ты будешь анимировать если нету нечего?
Перед нами старые добрые счёты, появились всего за пару тысяч лет до калькулятора.
Нормальные счёты содержат 10 косточек в линии и для удобства 5я и 6я выделяются цветом, как средние.
Судя по фотографии сумма двух товаров получилась (смотрим сверху вниз) сумма стоимости двух товаров получается: 8324
стоимость одного из товаров:2536
Находим разность: 8324-2536=5788
2 у одной 2 у другой и у другой 2 а у последней зеркало
Var
a: array[1..10, 1..10] of integer;
i, j, k: integer;
begin
k := 1;
for i := 1 to 10 do
begin
for j := 1 to 10 do
begin
if(j >= i) then begin
a[i, j] := k;
k += 1;
end
else a[i, j] := 0;
write(a[i, j]:3);
end;
k := 1;
writeln();
end;
<span>end.</span>