Вот пример: program prim_4; var a, b: real; begin write('введите число'); readln(a); в: =a*а; {получаем а во 2} b: =в*в; {получаем а в 4} в: =a*b; {получаем а в 5} b: =в*в; {получаем а в 10} b: =в*в; {получаем а в 20} writeln('a в 20 степени=',в: 0: 2); {вместо указания ширины поля для вывода числа лучше ставить 0, тогда компилятор отведет столько позиций под целую часть, сколько получилось в ответе, а для дробной части я посчитала возможным оставить 2 позиции} readln end. в фигурные скобки {} в программе можно заключать комментарий, компилятор пропускает текст, заключенный в такие скобки, а комментарий позволяет вспомнить о чем программа если вы позднее возвращаетесь к ее тексту. 1.дано вещественное число а. не пользуясь никакими арифметическими операциями, кроме умножения, получить: а^9 за четыре операции;