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

Var b, m, a: real;
      mm: integer;

begin
read(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.