21-16 = 5 см полей вообще
5 - 2 = 3 левое поле
Program Multy;var i, n, x, mt:integer;beginwrite('введите целое число X ');readln(x);write('введите степень N ');readln(n);mt:=x;for i:=1 to (n-1) do begin mt:=mt*x; end;writeln(x,' в степени ',n,' равно ',mt);end.