Определите, что будет напечатано в результате работы следующей программы: Var m, n : integer; begin m := 50; for n := 1 to 7 do m := m – 7; write(m); end.
7 раз будет повторяться выражение m-7 то есть 50-7=43 43-7=36 36-7=29 29-7=22 22-7=15 15-7=8 8-7=1 На экран выведет 1