Составить программу,вычисляющую сумму кубов всех 2-значных чисел — Pascal(Паскаль)

var
    sum,i:longint;
begin

    sum:=0;
    for i:=10 to 99 do
        sum:=sum+i*i*i;
    write('Ответ: ',sum);
end.