Задание

Заполни пропуски

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

а)program \(a5\) ;

var \(i, m: integer\) ;

begin

\(m:=0\) ;

for \(i:=1\) to \(6\) do

\(m:=m–6\) ;

\(writeln (m)\) ;

end;

\(i\) \(m\) \(i\lt=6\)
\(0\)
[ ] [ ]
[ ] [ ]
[ ] [ ]
[ ] [ ]
[ ] [ ]
[ ] [ ]

б)program \(a6\) ;

var \(i, m: integer\) ;

begin

\(m:=0\) ;

for \(i:=3\) to \(7\) do

\(m:=m–6+i\) ;

\(writeln (m)\) ;

end.

\(i\) \(m\) \(i\lt=7\)
\(0\)
[ ] [ ]
[ ] [ ]
[ ] [ ]
[ ] [ ]
[ ] [ ]