Question

Для приготовления компота из персиков берут сахар , персики и воду в пропорции 1:1:3.Сколько кг каждого продукта надо взять ,чтобы сварить Р кг компота? Решить с помощью паскаль
расписать или отпраить вложением фотку полность ю расписать задачу 4 неизвестных интежер 

Answer 1

Зачем Integer? Бери Real, а с Integer'ом тут ошибки могут появится немалые:) $1+1+3=5$ частей всего, потом ищем, сколько кг в 1 части и решаем: 1 часть сахара, 1 часть персиков и 3 ($a*3$) части воды)
var a, P: real;
begin
     readln(P);
     a := P / 5;
     writeln(a, ' кг сахара');
     writeln(a, ' кг персиков');
     writeln(a * 3, ' литров воды');
end.