Составьте программу чтобы ** экран выводились числа от 2 до 7 и кубы этих чисел

Question

Составьте программу чтобы на экран выводились числа от 2 до 7 и кубы этих чисел

Answer 1

Program cube;
Var a, I: integer;
Begin
For I = 2 to 7 do
Begin
a:= power(I,3);
Writeln(I, ' ', a);
End;
End.