Определите значение переменной b после выполнения фрагмента программы.

a:=1;

b:=3;

for i:=6 downto 1 do b:=b+i;

if a +b >25 then b:=b - a else b:= b+a;

Ответ:

a:=1;

b:=3;

for i:=6 downto 1 do b:=b+i;//тут к б добавляется значение и. И, в свою очередь меняется от 6 до 1. Кароче будет=3+6+5+4+3+2+1=24

if a +b >25 then b:=b - a//если а+ б больше 25 то делаем что-то, но т.к. оно не больше, то нас это не интересует

else b:= b+a;//а вот это очень интересует. К б прибавляется а, и получается б=б+а=24+1=25

Ответ 25