Задание
Укажите количество различных значений, которые будут выведены на экран в результате работы программы, при вводе значений переменной s от 10 до 15.
var s, n: integer;
begin
readln(s);
n := 1;
while s < 70 do
begin
s := s + 13;
n := n * 2;
end;
writeln(n)
end.