Запишите число, которое будет выведено в результате работы программы:
var s, n: integer;
begin
s := 0;
n := 0;
while s*s <= 10*s do begin
s := s + 1;
n := n + 2
end;
writeln\(n\)
end.