a := 6*12+3; b:= a div 10 + 5; a:= b mod 10 + 1; c:=a*a+b*b-a/2* b;

4) Определим значение переменной c после выполнения фрагмента программы:

1. a := 6*12 + 3; (Сначала выполняется умножение: 6 * 12 = 72, затем сложение: 72 + 3 = 75, значит a = 75)
2. b := a div 10 + 5; (Целочисленное деление a на 10: 75 div 10 = 7, затем к результату прибавляем 5: 7 + 5 = 12, значит b = 12)
3. a := b mod 10 + 1; (Вычисляем остаток от деления b на 10: 12 mod 10 = 2, затем к результату прибавляем 1: 2 + 1 = 3, значит a = 3)
4. c := a*a + b*b - a/2 * b; (Вычисляем значение выражения: c = 3*3 + 12*12 - 3/2 * 12 = 9 + 144 - 1.5 * 12 = 153 - 18 = 135)

Ответ: 135