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

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

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

Answer 2

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