Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program;
var
max,val: integer;
label
start, ends;
begin
max: =-50;
val: =50;
start:
if val> max then val: =val-10
if val=max then goto ends;
goto start;
ends:
end.
я так понимаю нужно нарисовать рисунки рыб, карасей и различных животных. множества нужно перекрестить(множество рыб и хищ. животных), так как рыба тоже может быть хищником
Популярные вопросы