Предмет: Информатика,
автор: overwatchge
Решить задачу. На фабрику поступило 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.
Похожие вопросы
Предмет: Русский язык,
автор: sew1977
Предмет: Английский язык,
автор: Юлек333
Предмет: Русский язык,
автор: alexxa1
Предмет: История,
автор: margo152128
Предмет: Математика,
автор: Олег200529