.
Объяснение:
Var
n:integer;
Begin
readln(n);
If n div 70>=3 then writeln('Да')
else writeln('Нет')
end.
