Question

Задали по информатике составить программу для a3(а в кубе).
Как это сделать помогите пожалуйста.

Answer 1

Program KUB;
Uses crt;

var a: integer;

Begin clrscr;
      write('Введите число a = ');
      readln(a);
      writeln;
      write('a^3 = ',a*a*a);

End.


ЛИБО

 write('a^3 = ',exp(3*ln(a)));
     

Answer 2

Наиболее быстрый вариант a*sqr(a)