Задание

Определите, при каком наименьшем введённом значении переменной s программа выведет число 320.

var s, n: integer;

begin

readln (s);

n := 5;

while s > 23 do begin

s := s - 5;

n := n * 2

end;

writeln(n)

end.