6 - Анализ программ с циклами

1. Определите, при каком наименьшем введённом значении переменной s программа выведет число 64.
var s, n: integer;
begin
readln (s);
n := 1;
while s < 51 do begin
s := s + 5;
n := n * 2
end;
writeln(n)
end.
Ответ: 
2. При каком наибольшем введенном числе d после выполнения программы будет напечатано 55?
var n, s, d: integer;
begin
readln(d);
n := 0;
s := 0;
while s <= 365 do begin
s := s + d;
n := n + 5
end;
write(n)
end.
Ответ: 
3. (М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 128.
var s, n: integer;
begin
readln (s);
n := 1;
while s < 94 do begin
s := s + 8;
n := n * 2
end;
writeln(n)
end.
Ответ: 
4. (М.В. Кузнецова) Определите, при каком наименьшем введённом значении переменной s программа выведет число 256.
var s, n: integer;
begin
readln (s);
n := 1;
while s <=45 do begin
s := s + 4;
n := n * 2
end;
writeln(n)
end.
Ответ: 
5. (М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 256.
var s, n: integer;
begin
readln (s);
n := 1;
while s <= 45 do begin
s := s + 4;
n := n * 2
end;
writeln(n)
end.
Ответ: 
6. (М.В. Кузнецова) Определите, при каком наименьшем введённом значении переменной s программа выведет число 96.
var s, n: integer;
begin
readln (s);
n := 3;
while s <= 51 do begin
s := s + 7;
n := n * 2
end;
writeln(n)
end.
Ответ: 
7. (М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 96.
var s, n: integer;
begin
readln (s);
n := 3;
while s <= 51 do begin
s := s + 7;
n := n * 2
end;
writeln(n)
end.
Ответ: 
8. (М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 128.
var s, n: integer;
begin
readln (s);
n := 1;
while s > 43 do begin
s := s - 8;
n := n * 2
end;
writeln(n)
end.
Ответ: 
9. (М.В. Кузнецова) Определите, при каком наименьшем введённом значении переменной s программа выведет число 31.
var n, s: integer;
begin
readln(s);
n := 10;
while s > 0 do begin
s := s - 15;
n := n + 3;
end;
write(n)
end.
Ответ: 
10. (М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 31.
var n, s: integer;
begin
readln(s);
n := 10;
while s > 0 do begin
s := s - 15;
n := n + 3;
end;
write(n)
end.
Ответ: