Решить задачу. На фабрику поступило a кг промытой шерсти, b% веса которой составляет вода. При сушке за каждый час испаряется 30% имеющейся влаги. Сколько процентов от веса шерсти будет составлять вода после 5 часов сушки?(pascal abc)
Ответы
Ответ дал:
1
Ответ:
var a,b,i: integer;
var c: real;
begin
write('Введите, сколько кг промытой шерсти поступило',
' на фабрику: ');
readln(a);
write('Введите процент воды: ');
readln(b);
c:=a*(b/100); // Всего воды (в кг)
for i:=1 to 5 do
begin
c:=c*0.7;
end;
writeln('Вода составляет ',c/a,'% от веса шерсти',
' после 5 часов сушки');
end.
Вас заинтересует
3 месяца назад
3 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад