Запишите команду if ....then...else для решения задачи: увеличить число d на 5 если оно кртно 7 и уменьшить на 20 в противном случае
If d=7 then d=d+5 else d=d-20
Не верно. не знаешь, что значит кратно.
Вот верный ответ: if (d mod 7 = 0) then d:=d+5 else d:=d-20;