Помогите пожалуйстаа!!

Определите результат работы программы, написанной на языке Паскаль.

1) program a5

var i, m: integer;

begin

m:= 0

for i: = 1 to 6 do

m: = m-6

writeln (m)

end.

2) program a6

var i, m: integer;

begin

 m:= 0;

 for i: = 3 to 7 do

m: = m-6+i;

writeln (m)

end.