1)Составьте алгоритм вычисления куба всех Чётных чисел от 2 до 100
2)Составьте алгоритм вычисления суммы кубов всех нечётных чисел от 101 до 301
______________________________________________________________________________
и обьясните пожалуйста примерно что да как делалось

var i,s:integer;begins:=0;for i:=2 to 100 doif not odd(i) then s+=i*i*i;writeln(s);s:=0;for i:=101 to 301 doif odd(i) then s+=i*i*i;writeln(s);end.