Как делать описание к программе (пример)

Program zadacha; //заголовок программы

var b,k,t:integer; //описание трех переменных: b - количество быков, k - количество коров, t - количество телят.

begin //начало раздела операторов

for b:= 1 to 10 do //перебираем разные варианты количества быков (их может быть не больше 10)

for k:= 1 to 20 do //перебираем разные варианты количества коров (их может быть не больше 20)

for t:= 1 to 200 do //перебираем разные варианты количества телят (их может быть не больше 200)

if (b+t+k=100) and b*10+k*5+t*0.5=100 then //проверяем условия: общее количество животных должно равняться 100, сумма затраченная на них тоже должна равняться 100. Если данные условия верны, то

begin //операторные скобки, нужны, потому что вывод выполняется с помощью трех команд, выполняемых в цикле

writeln('Количество быков ',b); //выводится на экран количество быков

writeln('Количество коров ',k); //выводится на экран количество коров

writeln('Количество телят ',t); //выводится на экран количество телят

end; //закрытие операторной скобки

end. //конец программы