Дано число а. вычислите а10, используя стандартную функцию sqr (x

Функция sqr(x) служит для возведения аргумента х в квадрат, поэтому представим a¹⁰ в виде максимально возможного набора операций возведения в квадрат. a¹⁰ = a²·a⁸ = a²·(a⁴)² = a²·[(a²)²]² var   a: real; begin   write('a=');   read(a);   writeln(a,'^10=',sqr(a)*sqr(sqr(sqr( end. тестовые решения a=2 2^10=1024 a=3.18 3.18^10=105747.765633159 a=10 10^10=10000000000 a=318.53 318.53^10=1.07523505784868e+25

uses crt; var

  a,b,c,min: integer; begin  writeln('введи три числа: ');   readln(a,b,c);   min: =a;   if b< min then min: =b;   if c< min then min: =c;   writeln('наименьшее из этих чисел:   ',min); end.