Составить программу на Turbo paskal:
Вычислить a в степени n (n>0),где а-вещественное число,которое необходимо возвести в целую положительную степень n.
Вычислить a в степени n (n>0),где а-вещественное число,которое необходимо возвести в целую положительную степень n.
More Questions From This User See All
Answers & Comments
i,n,p:integer;
Begin
write('n = ');
readln(n);
write('a = ');
readln(a);
p:=1;
for i:=1 to n do
p:=p*a;
writeln('a^n = ',p:8:3);
readln
End.