<span>program nomer;
var
N:integer;
begin
writeln('vvedite chislo ');
readln(N);
N:=(N div 100)+((N div 10) mod 10)+(N mod 10);
writeln('summa 4ucel ravna: ',N);
writeln;
readln;
end<span>.</span></span>
Если ввести в окно поиска какое нибудь слово, то браузер найдет его значение или информацию о запросе