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

Var a,b,i: integer;

begin

a:=5;

b:=1;

for i:=1 to 10 do

begin

b:=a-i;

If a-b<6 then a:=b-2a

else a:=2b-a

end;

writeln(a)

end.

Question

Информатика: Определите, что будет напечатано в результате выполнения следующего алгоритма: Var a,b,i: integer; begin a:=5; b:=1; for i:=1 to 10 do begin b:=a-i; If a-b 6 then a:=b-2*a else a:=2*b-a end; writeln(a) end.

сюрприз23456789 · Answer

Будет напечатано -88Объяснение:Я смог...

Определите, что будет напечатано в результате выполнения следующего алгоритма: Var a,b,i: integer; begin a:=5; b:=1; for i:=1 to 10 do begin b:=a-i; If a-b<6 then a:=b-2*a else a:=2*b-a end; writeln(a) end.

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

Var a,b,i: integer;

begin

a:=5;

b:=1;

for i:=1 to 10 do

begin

b:=a-i;

If a-b<6 then a:=b-2a

else a:=2b-a

end;

writeln(a)

end.