Уровень а для приготовления компота из персиков берут сахар ,персики и воду в пропорции 1: 1: 3. сколько кг каждого продукта надо взять , чтобы сварить р кг компота ?

1 часть сахара, 1 часть персиков и 3 () части воды)
var a, P: real;
begin
     readln(P);
     a := P / 5;
     writeln(a, ' кг сахара');
     writeln(a, ' кг персиков');
     writeln(a * 3, ' литров воды');
end.