Нарисовать блок схему для нахождения площади треугольника

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.           

я думаю что основанием будет число 7 

проверка: 7^2*1+7^1*2+7^0*2= 49+14+2=65