Для приготовления компота из персиков берут сахар , персики и воду в пропорции 1:1:3.Сколько кг каждого продукта надо взять ,чтобы сварить Р кг компота? Решить с помощью паскаль, расписать все
Var p: Integer; Begin readln(p); writeln('Сахар ',p / 5); writeln('Персики ',p / 5); writeln('Вода ',p / 5 * 3); End.