Программа запрашивает число n. Далее, мы вводим n чисел и сохраняем все введенные числа в список. Далее, программа запрашивает пользователя число m. Если число m существует в нашем списке, программ а должна вывести слово "Yes" и вывести индекс (расположение, адрес) данного числа. Иначе вывести слово "No".
ПИТОН. СПИСКИ

var

mas : array[1..15] of integer;

i: integer;

begin

for i: =1 to 15 do

begin

  mas[i] : = random(40)-20;

  if (mas[i] mod 2 = 1) then mas[i]: =mas[i]/2;

  if (mas[i] mod 2 = 0) then mas[i]: =mas[i]*3;

end;

end;

например такие числа

954-459=495

20-25=-5                                                                                   

поправьте меня если ^ это не указатель стпени, но если это степень то вот просто:

var a,x: extended; n,i: longint; begin    read(x);     read(n);     a: =1;     for i: =1 to n do        a: =a*x;     writeln(a: 0: 0); end.