Автор поэмы "Аникщайский бор" А. Баранаускас (1835-1902) был не только поэтом, но и математиком-любителем. Особенно интересовался он теорией чисел: он исследовал свойства простых чисел. Приведем одну из самых любимых задач его детства, над которой, как он сам позднее писал, бился недели две, пока не нашел решения: сколько можно купить быков, коров и телят, платя за быка 10 р., за корову - 5 р., а за теленка - полтинник, если на 100 рублей надо купить 100 голов скота?
Program skot;
var b, {быки}
k, {коровы}
t: integer; {телята}
begin
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
begin
writeln('Быков: ', b:4);
writeln('Коров: ', k:4);
writeln('Телят: ', t:4)
end
end;
readln;
end.
Выполнив эту программу, ЭВМ напечатала такие результаты:Быков: 1
Коров: 9
Телят: 90
2012-06-22 • Просмотров [ 2745 ]