|
zadach428.BAS |
|
{* Задача428 *}REM basic ' Составить программу расчета нагрузки скота (голов) на 1 га пастбищ по формуле' Где: У – урожай зеленой массы с 1 г пастбищ за период, ц;' К – количество пастбищного корма на голову скота в сутки, ц;' Д – продолжительность использования пастбища, дни.' Урожай зеленой массы с 1 га пастбища изменяется в пределах от 120 до 160 с шагом 1 ц.INPUT "vvedite k ", k
INPUT "vvedite d", d
PRINT "urojay skot urojay skot"
For u = 120 To 160
skot = u / (k * d)
PRINT u, skot; " ";
If u Mod 2 0 Then PRINT
Next
End
|