PASCAL!!!
нужно возвести число(любое) в ЧЕТНУЮ СТЕПЕНЬ n количество раз.
например число 2 возводим в четные степень
2 в 2=4
2 в 4 =16
2 в 6=64
и тд.
нужно возвести число(любое) в ЧЕТНУЮ СТЕПЕНЬ n количество раз.
например число 2 возводим в четные степень
2 в 2=4
2 в 4 =16
2 в 6=64
и тд.
More Questions From This User See All
Answers & Comments
begin
readln(a);
readln(n);
i:=0;
ans:=1;
while(i<n) do
begin
ans:=ans*a*a;
inc(i);
writeln(ans);
end;
end.
Так? По тести)