определите значение переменной s после выполнения фрагмента программы
s:=0;
k:=0;
while s<1024 do
begin
s:=s+10;
k:=k+1;
end;