Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

Сделайте задачу в программе паскаль. Составьте программу вычисления степени числа A с натуральным показателем N.

Ответ оставил Гость

program sasa;
function stepenj (val:integer):integer;
var inp,i,tmp:integer;
begin
tmp:=val;
Result:=1;
Writeln (Vvedi stepenj);
Readln (inp);
for i:=1 to inp do
Result:=Result*tmp;
Writeln (Result);
end;