Пользуясь ограничениями: в каждом операторе - только одно арифметическое действие: сложение, вычитание, умножение, напишите на языке Паскаль наиболее короткие алгоритмы вычисления: а) y = x^10.
Begin read(x); k:=x; for i:=1 to 10 do x:=x*k; writeln(k); end.