Дано число а. вычислите а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

v=331+0.6t

в зимний день- v=331+0.6*(-35)=310 м/с

в летний день- v=331+0.6*30=349 м/с

var

n,a: integer;

begin

readln(n);

a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;

if n> a then

writeln('число ', n, ' больше перевертыша ', a)

else

writeln('перевертыш ', a, ' больше числа ', n);

end.