ПАСКАЛЬ !!! Помогите пожалуйста!! Данно целое число А. Пользуясь только умножением, получите: А^2, А^5, А^17 за шесть операций.
program d1; var x,v,b,n,d,q:integer begin x:=A*A; v:=x*x*A; b:=v*v*v*x; writeln(x); writeln(v); writeln(b); end.
Спасибо!