Срочно пожалуйста !!! Составить программу, которая возводит число 5 в степень n входные данные n=2 выходные данные 25
Var a,n,i:integer; Begin Read(n); a:=1; for i:= 1 to n do a:=a*5; write(a); End.
спасибо!
ошибка, не правильно выводит число в 7 степени
т.е не правильно выводит в 5 степень
я сам тупанул, всё правильно тут, извини