Лёгкая задача по информатике паскаль.

По заданному числу x и целому n вычислить x^n используя цикл repeat ... until.

Question

Информатика

Стахий

20 июля, 00:13

Лёгкая задача по информатике паскаль.

По заданному числу x и целому n вычислить x^n используя цикл repeat ... until.

+4

Ответы (1)

Знаете ответ?

Евгеха · Answer 1

Var x, xn:real; n, i:integer;

begin

readln (x, n) ;

xn:=1; i:=0;

repeat

i:=i+1;

xn:=xn*x;

until i=abs (n) ;

if n<0 then xn:=1/xn;

writeln (x:3:1,'^', n,' = ', xn:6:4) ;

end.

Пример:

2 - 3

2.0^-3 = 0.1250

Лёгкая задача по информатике паскаль.По заданному числу x и целому n вычислить x^n используя цикл repeat ... until.

Лёгкая задача по информатике паскаль.

По заданному числу x и целому n вычислить x^n используя цикл repeat ... until.