Question

Определите, что будет напечатано в результате работы следующего фрагмента программы:  
var n, s: integer;  
begin
n := 0;  
s := 512;  
while s >=0 do begin  
s := s -20;  
n := n + 1  
end;  
write(n)  
end

Answer 1

выведет число 26 на экран