Написать программу вычисления a^n, где a и n целые числа, при условии, что n 0 на !

Question

Информатика: Написать программу вычисления a^n, где a и n целые числа, при условии, что n 0 на !

Яяяяя11111111 · Answer

Var a,n:integer;beginread(a,n);write(power(a,n));end.Или вот так:var a,n,i,r:integer;beginread(a,n);r:=1;for i:=1 to n do r:=r*a;write(r);end....

Написать программу вычисления a^n, где a и n целые числа, при условии, что n> 0 на !