Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Работы полностью)) / 6.4.1(#6) / Отчет
.docxОтчет по работе 6.4.1 №6
Задание
Составить алгоритм решения задачи: сколько можно купить быков, коров и телят, платя за быка 10 руб., за корову — 5 руб., а за теленка — 0,5 руб., если на 100 руб. надо купить 100 голов скота?
Код работы:
CLS
COLOR 10.1
FOR b = 0 TO 10 STEP 1
FOR k = 0 TO 20 STEP 1
t = 100 - (b + k)
IF 20 * b + 10 * k + t = 200 THEN
PRINT "Na 100 rublei mozhno kupit:"
PRINT b; "Bika(ov)"
PRINT k; "Korov(u)"
PRINT t; "Telenka/Telyat"
END IF
NEXT
NEXT
Скриншот программы с ответом: