Помогите пожалуйста!
На берегу реки сидят жуки и пауки, у которых вместе N ног. У каждого жука по 6 ног, у паука по 8 ног. Известно, что ног у всех жуков в K раз меньше, чем у всех пауков.Напишите программу, которая определяет, сколько всего жуков и пауков сидит на берегу.Это все в pascale.

//прога на Pascal`e
var
N : uint64;
K : real;
begin
write (Введите кол-во ног: );
readln (n);
write (Введите отношение ног жуков к паукам: );
readln (k);

if trunc (n/(k+1)) lt;gt; n/(k+1) then write (Неверное условие!)
else 
if trunc (n/(k+1)) mod 8 lt;gt; 0 then write (Неверное условие!)
else write (Жуков: , n/(k+1)*k/6, , пауков: , n/(k+1)/8);

end.