Дано действительное число х не пользуясь никакими другими арифметическими операциями кроме умножения получить х^4,х^12,x^28 за шесть операций нужно только рассписать,чтобы я могла ввести решение в програму паскаль.

Это цикл for.

R:=1;

if n=0 then Writeln('1') else

  begin

  for i:=1 to n do //где n степень, в которую необходимо возвести

  R:=R*x; //где R - результат, а x - число, возводимое в степень

  Writeln(R);

  end;

что-то подобное должно быть.