Будем рассуждать:
Заяц, Волк и Лиса не были последними. Волк и Ёж не были первыми. Т.е. остаётся два варианта: Заяц и Лиса. Судя по этому можно определить, что Лиса была первой, т.к. Заяц не мог (по моему мнению) ПРИБЕЖАТЬ первым, потому, что он прыгает, а это (по моему мнению) не считается. Поэтому Лиса была первой.
var x,y: real;
begin
readln(x);
if x>8 then y:=x/4 else y:=x*5;
writeln(y);
end.
1)
var b,i:integer;
begin
b:=0;
for i := 100 to 999 do
if (i mod 17) = 0 then b:=b+i;
writeln (b);
end.
2)
var b,c:integer;
begin
b:=1;
for c:= 1 to 15 do
b:=b*c;
writeln (b);
end.