Вычислите значение в линейных и разветвляющихся алгоритмах а:=4 b:=4 а:=2*а+3*b b:=а/2*b...

Question

Вычислите значение в линейных и разветвляющихся алгоритмах а:=4 b:=4 а:=2*а+3*b b:=а/2*b b-?

Answer 1

Var  a, b: real;
begin 
a:=4; 
b:=4;  
a:=2*a+3*b;  
b:=a/2*b; 
write(b);
end.

Ответ
40