Обprogram kek;var a , b: real;i: integer;beginfor i := 1000 to 10000 dobegin a := i mod 100; b := i div 100; if a + b = 100 then writeln(i)end;end.ъяснение:
116
Объяснение:
d = 100
для k от 5 до 12 выполнить
Действия в цикле:
1) d = d - 6
2) d = d + 8
Вывод d
Цикл выполнится 8 раз
количество повторов в цикле равно конечное значение (12) переменной счётчика (k) минус начальное значение (5) переменной счётчика (k) плюс 1
количество повторов в цикле = 12 - 5 + 1 = 7 + 1 = 8
В цикле переменная d сначала уменьшается на 6, а затем увеличивается на 8.
В сумме эти действия (
) увеличивают переменную d на 2.
Следовательно за весь цикл переменная d увеличится на 2 * 8.
Т.к. в начале программы d = 100, то
d = 100 + 2 * 8 = 100 + 16 = 116
program kek;var a , b: real;i: integer;beginfor i := 1000 to 10000 dobegin a := i mod 100; b := i div 100; if a + b = 100 then writeln(i)end;end.