Подробно расписать в Pascal и все. Само решение прикреплено.

Задание: Что будет выведено на экран после выполнения фрагмента программы?
a:=10, b:=5, с:=6
if (a>b) and (b>c) then x=3*a+2*b+c
else x=5*a-b+c

var  a, b, c, x: integer;begin  write('Введите а, b и c: ');  read(a, b, c);  if (a > b) and (b > c) then    x := 3*a + 2*b + c  else    x := 5*a - b + c;  writeln('Результат: ', x, '.');  end.