91712c4fb0cb6abd960c7adafadadec2.ppt
- Количество слайдов: 6
Вложенные циклы Организация перебора
Старинная задача Сколько можно купить быков, коров и телят, если плата за быка - 10 рублей, за корову - 5 рублей, за теленка полтинник (0, 5 рубля) и на 100 рублей надо купить 100 голов скота.
b – количество быков (по 10 рублей) b=0, 10 k – количество коров (по 5 рублей) k=0, 20 t – количество телят (по 0. 5 рублей) b+k+t=100 b*10+k*5+t*0. 5=100 t=0, 200 b+k+t=100 b*20+k*10+t=200
b=0, 10 k=0, 20 t=0, 200 b+k+t=100 b*20+k*10+t=200 For b: =0 to 10 do …. .
uses crt; var b, k, t: integer; begin clrscr; for b: =0 to 10 do for k: =0 to 20 do for t: = 0 to 200 do if (b+k+t=100) and (20*b+10*k+t=200) then writeln(b, k: 4, t: 4); readkey; end.
Сокращение перебора uses crt; var b, k, t: integer; begin clrscr; for b: =0 to 10 do for k: =0 to 20 do begin t: =100 -b-k; if 20*b+10*k+t=200 then writeln ( b, k: 4, t: 4); end; readkey; end.
91712c4fb0cb6abd960c7adafadadec2.ppt