Pascal ABC, Блок-схема - вопрос №637730

Даны действительные числа x, y (x не равно y). Меньшее из этих двух чисел заменить их полусуммой, а большее — их удвоенных произведением. 

Составить блок-схему, написать программу на языке Pascal 

Вопрос задан анонимно май 19, 2013 г.