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

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

Question

Информатика

Катюся

8 сентября, 21:15

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

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

+1

Ответы (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.