Составить программу на Turbo paskal:

Вычислить a в степени n (n>0), где а-вещественное число, которое необходимо возвести в целую положительную степень n.

Question

Информатика

Лавр

7 декабря, 13:15

Составить программу на Turbo paskal:

Вычислить a в степени n (n>0), где а-вещественное число, которое необходимо возвести в целую положительную степень n.

+4

Ответы (1)

Знаете ответ на вопрос?

Митяй · Answer 1

Var a:real;

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.

Составить программу на Turbo paskal:Вычислить a в степени n (n>0), где а-вещественное число, которое необходимо возвести в целую положительную степень n.

Составить программу на Turbo paskal:

Вычислить a в степени n (n>0), где а-вещественное число, которое необходимо возвести в целую положительную степень n.