Значение переменной c, вычисленное в программе, написанной на языке pascal,var a, b, c : integer; begina: =15; b: =5; c: =1; while a> b dobegina: =a–b; if b> c then begin b: =b–c; c: =2*c endend; writeln („c=‟, c)end.равно

Код программы в нормальном виде
var
    A, B, C: integer;

begin
    A := 15;
    B := 5;
    C := 1;
    while A > B do
    begin
        A := A - B;
        if B > C then begin
            B := B - C;
            C := 2 * C;
        end
    end;
    writeln('C=', C)
end.

Вывод
C=4