Дано целое число а и натуральное число n. найдите a^n. программу напишите в паскале через while или repeat.

Program program1; var a, n, i, result: integer; begin result : = 1; write('введите значение a: '); readln(a); write('введите значение n: '); readln(n); while (n > i) do begin result : = result * a; i : = i + 1; end; writeln('ответ: ', result); end.

как то так

Объяснение:

print("Ноль в качестве знака операции"

     "\nзавершит работу программы")

while True:

   s = input("Знак (+,-,*,/): ")

   if s == '0':

       break

   if s in ('+', '-', '*', '/'):

       x = float(input("x="))

       y = float(input("y="))

       if s == '+':

           print("%.2f" % (x+y))

       elif s == '-':

           print("%.2f" % (x-y))

       elif s == '*':

           print("%.2f" % (x*y))

       elif s == '/':

           if y != 0:

               print("%.2f" % (x/y))

           else:

               print("Деление на ноль!")

   else:

       print("Неверный знак операции!")

Информация – это совокупность каких-либо сведений, данных, передаваемых устно (в форме речи), письменно (в виде текста, таблиц, рисунков, чертежей, схем, условных обозначений)либо другим например, с звуковых или световых сигналов, электрических и нервных импульсов, перепадов давления или температуры и т.д.).

В середине 20 века термин «информация» стал общенаучным понятием, включающим обмен сведениями между людьми, человеком и автоматом (ЭВМ), автоматом и автоматом, обмен сигналами в животном и растительном мире, передачу признаков от клетки к клетке, от организма к организму.

Теоретические и практические вопросы, относящиеся к информации, изучает информатика.