Дан текст решения
var n: longint; begin readln(n); if n < 4 then writeln(-1) else writeln((n - 1 + 4) div 5) end.
1000 ms 256 Mb Правила оформления программ и список ошибок при автоматической проверке задач