помогите закончитьь присказку Дни идут за днями...

Составить блок схему и написать программу на турбо Паскале . Вычеслить s=1/2[max(a,b,c)+min(a,b,c)] 

1) a=8; b=3; c=-2;

2)a=1; b=4; c=16;