Developing.ru

Уважаемые программисты, если вам не трудно, помогите мне решить простенькую задачку. Ну не даётся мне Pascal. Заранее огромное спасибо.
Задача: Программирование алгоритмов разветвляющейся структуры. Даны a и b, (a не равно b), меньшее из этих чисел заменим их полусуммой, а большее их удвоенным произведением.