Маленький Вася пошел в зоопарк.Там на пруду он увидел одну цаплю,несколько гусей и вдвое больше овец.Всего Вася насчитал n ног.Помоги Васе определить,сколько гусей и овец на пруду
Написано на Pascal: Program Lake; Var a, b, n: Integer; Begin WriteLn('n = '); ReadLn(n); If n < 2 Then WriteLn('Error!') Else Begin n := n - 2; a := n div 3; b := a * 2; WriteLn('На пруду ',a , ' гусей и ',b , ' овец.'); End; ReadLn; End.