Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
смотри скриншот
хай
var x1,x2,x3,x4,x5: integer;
s: real;
begin
read(x1,x2,x3,x4,x5);
s: = (x1+x2+x3)/(x4+x5);
if round(s)=s then writeln("celoe - "s);
end.
я так понимаю нужно нарисовать рисунки рыб, карасей и различных животных. множества нужно перекрестить(множество рыб и хищ. животных), так как рыба тоже может быть хищником
Популярные вопросы