{* Задача417 *}

REM basic

' Составить блок-схему алгоритма и программу расчета числа загонов на пастбище по формуле
' К = П/Ч + О,
' где П – период, необходимый для отрастания травы на пастбище, дни;
' Ч – количество дней пастьбы скота в каждом загоне;
' О – потребное количество загонов для возобновления травостоя.
' Количество дней пастьбы скота в загоне изменяется от 1 до 5 дней с шагом 1 день.


CLS
INPUT "vvedite p"; p
INPUT "vvedite o"; o
For c = 1 To 5
    k = p / c + o
    If k  FIX(k) Then k = FIX(k) + 1
    PRINT "k("; c; ")="; k
Next
End