Вопрос Что будет напечатано в результате выполнения программы?

[Qwertyk]

N:=0;
S:=0;
While s<=47 do
Begin
N:=n+1;
S:=s+2;
End;
Write;