[lmikle]

В принципе все правильно. Только надо учитывать синтаксис паскаля.

Код:

if (x <= 0) or (x >= 640) then dx := -1 * dx;
if (y <= 0) or (y >=350) then dy := -1 * dy;