Определите, что будет напечатано в результате работы следующей программы:
var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.