Нужен код на паскале. чему будет равно значение переменной s, после работы программы, представленной в виде блок-схемы, где div - оператор целочисленного деления? s: =1024 i: =1 to 10 s: =s div 2 s заранее ! : )

Var
    s, i: integer;

begin
    s := 1024;
    for i := 1 to 10 do
        s := s div 2;
    
    Println(s);
end.

Вывод
1