Pascal AbcВот программа, которая высчитывает ступень числа:var x,y,st,i,:integer;begin st:=1; write(39;число:39;); readln(y);

Pascal AbcВот программка, которая высчитывает ступень числа:var x,y,st,i,:integer;begin st:=1; write(39;число:39;); readln(y); write(39;степень:39;); readln(x); for i:=1 to x do st:=st*y; writeln(39;итог::39;,st);end.Как в этот код добавить: quot;Если число amp;gt; 10, то программа должна вывести на экран: quot;Введите иное числоquot; quot;