запишите значение операторов языка Паскаль.... (21-е пожалуйста)

Спасибо!

1) Если значение переменной a делится на 2 без остатка( то есть чётное), то разделить a на 2, иначе прибавить к a 1.Примечание: но подобное, на сколько мне известно, приведёт к ошибке компиляции, так как операция mod применима только к целочислительным типам, а / - к вещественным.2)Вывести значения переменных S и P.3)Ввести значения переменных k и m.