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

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