Question

Какой будет ответ программы

Pascal

program PR;

function Power(a: integer; n: integer): integer;

var i, Result:integer;

begin

Result := 1;

for i:=1 to n do

Result *= a;

end;

var

a: integer;

n: integer;

begin

a:=3;

n:=4;

writeln(Power(a,n));

end. C++

#include <iostream>

using namespace std;

double Power(double a, int n){

double Result = 1;

for(int i=1;i<=n;i++){

Result*=a;

}

return Result;

}

int main()

{ double a=3; int n=4;

cout <<Power(a,n) << endl;

return 0;

}



A) 81

B) 4

C) Ошибка

D) В программе не верно описана функция

E) Нет верного ответа



​

Answer 1

Ответ А) 81. Верность гарантирую.