Петр Катя и Андрей сделали s печенья Сколько печенья сделал каждый если Петр и Андрей сделали одинаковое колличество а Катя сделала в два раза больше чем Петр и Андрей вместе программа Pascal
Если не ошибаюсь:
var s,c,b,m:integer;
begin
read(s);
c:=s div 2; // Сделала Катя
b:=c div 2; //Сделал Петя
m:=c div 2; // Сделал Андрей
write(c,' ',b,' ',m);
end.