60

Написать программу вычисления a^n, где a и n целые числа, при условии, что n>0 на…

09 февраля 2023

Написать программу вычисления a^n, где a и n целые числа, при условии, что n>0 на паскале!

категория: информатика



36

Var a,n: integer; beginread (a,n); write (power (a,n); end. Или вот так: var a,n,i,r: integer; beginread (a,n); r: =1; for i: =1 to n do r: =r*a; write (r); end.

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


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...