program Project4; {$APPTYPE CONSOLE} var i,s,a,b:integer; begin s:=0; for i:=10 to 99 do begin a:=i div 10; b:=i mod 10; if (a+b) mod 5=0 then s:=s+(i*i*i);end; writeln('Suma kubiv S=',S); readln; end.