Определите значение переменной спосле выполнения следующего фрагмента программы:

a: = 30;

b: = 6;

a: = a * 3 / b;

if a > b then

с: = 2*a - 5 * (b+2)

else

с: = 2*a + 5 * (b+2) ;

A: = 30;

a:=30;

b: = 6;

a:=30*3/6 после этого a примет значение a:=15, подставляем в условие

if 15>6 then (если условие выполняется), а оно выполняется, то решаем первое уравнение

c: = 2*15-5 * (6+2) получаем

c:=-10

если писать на паскале, то будет так

var a, b, c:real;

begina: = 30; b: = 6;

a: = a * 3 / b; if a > b then

c: = 2*a - 5 * (b+2) else

c: = 2*a + 5 * (b+2) ;

writeln (c) ;

end.