15. Определите результат исполнения программки:var i, sum: integer;begin sum:= 0; i:=

var i, sum: integer;  //1-ая строчка значит, что "i, sum" - целочисленные переменные
begin  //начало цикла
sum:= 0;
i:= 1;  //задается значение переменным
while ilt;=3 do begin  //данная строчка означает, что пока переменная i меньше либо одинакова 3 происходит выполнение следующего фрагмента программки
sum:=sum+i;  //значение sum равно сумме переменных sum и i (3 и 4 строчки)
i:=i+1;  //i равно i+1
end;  //окончание цикла
writeln (sum);  //вывод значения переменной sum на экран
end  //окончание программки

Перебегаем к самой арифметике.

1-ый цикл программы:
1)sum:=sum+i
sum=0+1=1
2)i:=i+1
i=1+1=2

2-ой цикл:
1)sum=1+2=3
2)i=1+2=3

3-ий цикл:
1)sum=3+3=6
2)i=3+1=4

Так как во втором цикле переменная i стала одинакова 4, а по условию ее значение обязано быть меньше и одинаково 3, то программа пропускает
строчку "while ilt;=3 do begin" и перебегает сходу к выводу значения переменной sum на экран. Ответ: 6.