Помогите решить задачки на Паскале. Пожалуста, Очень срочно!!!

[VADOS2009-1]

№1
Дано вещественное число "а". Пользуватса можна тока операцыей умножения:
а) а (в 4 степени) за две операции
б) а (в 7 степени) за четыре операции
№ 2
Дано вещественное число "а". Пользуватса можна тока операцыей умножения:
а (в 5 степени) и а (в 13 степени) за 5 операций.
№ 3
Даны цифры двух десятичных целых чисел: трехзначного а3а2а1 и двухзначного b2b1, где а1 и b1 - число единиц; а2 и b2 - число десятков; а3 - число сотен. Получить цыфры числа, равного сумме заданых чисел (извесно, что это число трехзначное). Числа слагаемые и число результат не опредилять, условный оператор.

[Daramant]

№1:
a)
a := a * a;
a := a * a; // теперь в а храниться значение а в 4 степени

б)
b := a;
a := a * a;
b := b * a;
a := a * a * b; // а в 7 степени

№2:
b := a;
a := a * a;
a := a * a * b; // а в 5 степени (за 3 умножения)

b := a;
a := a * a;
b := b * a;
a := b * a;
a := a * a;
a := a * b; // а в 13 степени

№3:
Возможно нужно вот это:

function Sum(a, b: Byte; var d: Byte): Byte;
var
  c: Byte;
begin
  c := a + b + d;
    if (c > 10) then begin
      d := 1;
      c := c - 10;
    end
    else 
      d := 0;

  Sum := c;
end;

var
  d: Byte;
  a1, a2, a3, b1, b2: Byte;
begin
  // ввод данных (ai, bi)

  d := 0;
  writeln(Sum(a1, b1, d)); // вывод 1-й справа цифры результата
  writeln(Sum(a2, b2, d)); // 2-й цифры
  writeln(Sum(a3,  0, d)); // 3-й цифры

end.

[VADOS2009-1]

Спасибо большое!!!

[VADOS2009-1]

№ 1
Записать условие при каком белые фигуры распаложены на поле (a,b)
одним ходом пойти на поле (e,f) при етом под ударом чёрной фигуры находятса (с,d).
в) Конь (Ладья- не понятно написано)
н) Слон Слон
т) Король, Ферзь
№ 2
На поле (a,b) распаложен Король. Записать условие при каком он может попасть на поле (c,d).