Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Var x,y,z:integer;
sr:real;
begin
read(x,y,z);
sr:=(x+y+z)/3;
writeln(sr:2:1);
end.
1) 300: 10=30 книг - переносит
2) 30-20=10 книг - будет переносить
3) 150: 10=15 часов на 150 книг
Популярные вопросы