Помогите пожалуйста решить Паскаль!!!!!!! и нужно еще схему сделать! помогите..

Спасибо=***

var j: Real;    i: integer;begin     for i := 1 to 6 do         j := j + ((i + 1) / i * i * i);     writeln(j);end.Хорошего остатка дня, Snezzz00 :)