Написать программу (паскаль авс) в клетке сидят фазаны и кролики, вместе у них 64 лапы. Указать все возможные сочетания кроликов и фазанов

Question

Тора

29 ноября, 11:26

+2

Ответы (1)

Знаете ответ на вопрос?

Настена · Answer 1

Var

i, j:integer;

begin

i:=0;

j:=16;

repeat

writeln (i,' фазанов ', j,' кроликов') ;

j:=j-1;

i:=i+2;

until j=0;

end.