Задача . hard

var s, n: integer;
begin
  readln(s);
  n := 1;
  while s >= 5 do
  begin
    s := s - 15;
    n := n * 2
  end;
  writeln(n)
end.

s = int(input())
n = 1
while s >= 5:
    s = s - 15
    n = n * 2
print(n)

алг
нач
  цел n, s
  ввод s
  n := 1
  нц пока s >= 5
    s := s - 15
    n := n * 2
  кц
  вывод n
кон

#include <iostream>
using namespace std;
 
int main()
{  int s, n;
   cin >> s;
   n = 1;
   while (s >= 5) { s = s - 15; n = n * 2; }
   cout << n << endl;
   return 0;
}