Question

2. Между командами ввода и вывода впишите в алгоритм несколько команд присваивания, в результате чего должен получиться алгоритм возведения в 4-ю степень введённого числа (дополнительные переменные, кроме A, не использовать):

Answer 1

var a: integer;
begin
    a := sqr(a);
    a := sqr(a);
    write(a);
end.