Question

Пожалуйста помогите решить.какое значение примет переменная c в результате выполнения программы:? program v; var a,b,c: integer; begin a:=2; b:=a*3+1; if b>a+5 then a:=4; if b if b=a+5 then a:=b-a; c:=a*b+a-b; writeln('c=',с); end a.33 b.25 c.15 d.41

Answer 1

На фотке твоя программа и что она выводит 

Answer 2

Вот код полученый при убирании описок и тп

var
    a, b, c: integer;

begin
    a := 2;
    b := a * 3 + 1;
    if b > a + 5 then a := 4;
    if b = a + 5 then a := b - a;
    c := a * b + a - b;
    writeln('c=', c);
end.

вывод
c=33