Линейный поиск в массиве (питон)
катя торопилась и написала такой алгоритм линейного поиска:
i = 0
while a[i] ! = x:
i += 1
print( "a[{}]={}".format(i, x) )
проверьте, правильно ли сработает алгоритм, если искать в массиве [1, 2, 3] число 2? число 4?

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.

program nn;

uses crt;

var a: array [1..20] of real;

t: real;

i,n,min: integer;

begin

    {ввод последовательности, это самостоятельно}

    min : = 1;

    for i : = 1 to 20 do

    begin

          if  a[i] < a[min] then

                min : = i;

    end;

    t : = a[min];

    a[min] : = a[20-n];

    a[20-n] : = t;

end.

var x,x1: integer;

s: string;

begin

  read(x);

  s: =str(x);

  x1: =int(s[3]+s[2]+s[1]);

  writeln(x-x1);

end.

они будут меньше, быстрее, умнее и, если верить рекламе программного обеспечения, дружественнее.