3. Каждая молодая девушка в России любит ходить по магазинам. Всего в России n молодых девушек. Из них 65% ходят за продуктами. За одеждой ходят на 45% меньше чем за продуктами. За подарками в 4% меньше чем за одеждой и за компанию ходят остальные. Сколько молодых девушек ходят за компанию? СОСТАВЬТЕ РЕШЕНИЕ ДЛЯ: pascal ABC
program YoungGirls;
var
n, prod, cloth, gifts, company: integer;
begin
writeln('Введите общее количество молодых девушек: ');
readln(n);
prod := round(0.65 n);
cloth := round(0.55 prod);
gifts := round(0.96 * cloth);
company := n - prod - cloth - gifts;
writeln('Количество молодых девушек, ходящих за компанией: ', company);
end.