Цикл со счётчиком Общая структура цикла со счётчиком выглядит так (например): var i, x:integer; begin … for i := 1 to 10 do // цикл повторяется 10 раз begin x := x * 2; end; … i – это счётчик, x – переменная. Вариант для всех общий. Необходимо написать программу, считающую пятую степень числа x. Вместо … вставить свои части кода. Общая структура будет выглядеть примерно так: Program …; var i, x, y: …; begin y := 1; … for i := 1 to … do begin y := y * x; end; … end. Необходимо представить четыре теста: х = 2, х = -2, х = 1 и х = 0

Объяснение:

Program a1;

uses crt;

var i,x,y:integer;

begin

     clrscr;

     for i:=1 to 4 do begin

           write('vvedite chislo: ');

           readln(x);

           y:=exp(5*ln(x))

           write('chislo x v 5 stepeni ravno', y);

     end;

     readln;

end.

В общем случае, трассировка - один из отладки программ врукопашную: состояние программы контролируется на определённом отрезке времени её выполнения путём анализа значений переменных. трассировка в том или ином виде при отладке программ сложнее школьного дз практически неизбежна.
в простейшем случае, трассировка - вывод значений переменных на экран (например, в окно консоли) , либо расчёт их на бумажке для каждого шага.
в более продвинутом варианте используются точки останова, окно наблюдения, выполнение по шагам и, если есть, контекстный интерпретатор выражений.
есть также специальная "трассирующая консоль" - интерфейс вывода информации из программы в отладчик, если таковой присутствует.
почти любой современный отладчик показывает состояние програмm при её останове, что делает трассировку процессом легко доступным

Алгоритм
1) a x a = a² ⇒ b;    b x a = a³ ⇒ результат
2) a x a = a² ⇒ b;    b x b = a⁴ ⇒ c;   c x c = a⁸ ⇒ c;   c x b = a¹⁰ ⇒ результат

Программа на языке PascalABC.Net
var
  a,b,c,y:real;
begin
  Write('Введите число: '); Read(a);
  b:=a*a; y:=b*a; Writeln('Третья степень числа равна ',y);
  c:=b*b; c:=c*c; y:=b*c;
  Writeln('Десятая степень числа равна ',y)
end.

Тестовые решения:
Введите число: 2
Третья степень числа равна 8
Десятая степень числа равна 1024

Введите число: -13.594
Третья степень числа равна -2512.128188584
Десятая степень числа равна 215512594781.574