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