Помогите плиз) заранее спасибо (в паскале)
1.возвести число b в m степень.
2.возвести число a в пятую степень.
3.дано натуральное число M вычислить сумму чисел кратных 6 от 4 до M.

var b, m, a: real;      mm: integer;beginread(b, m, a, mm);writeln(power(b, m));writeln(power(a, 5.0));writeln(max(0, (12 + 6 * (mm div 6 - 1)) * (mm div 6) div 2));end.