50 баллов. В таблице Dat хранятся положительные или отрицательные целые числа....

Question

50 баллов. В таблице Dat хранятся положительные или отрицательные целые числа. Определите, что будет напечатано в результате работы следующей программы.

---

Answer 1

Просто подставляем вместо k значение от 1 до 10
If Dat[1]*m<0 then ....<br>5*1 не меньше нуля, идем дальше
If Dat [2]*m<0 then .....<br>4*1 не меньше нуля, идем дальше
If Dat[3]*m<0 then ....<br>-3*1<0 поэтому теперь m присваивается значение Dat[k], а это есть -3<br>If Dat [4]*m<0 then ....<br>2*(-3)<0 поэтому m:= 2<br>If Dat [5]*m <0 then ....<br>1*2<0 1 не меньше нуля, продолжаем<br>.If Dat [6]*m <0 then...<br>-10*2<0 меньше нуля, m присваиваем значечние -10<br>If Dat [7]*m <0 then ...<br>9*(-10)<0 m присваиваем 9<br>If Dat [8]*m <0 then ....<br>8*9<0 не меньше нуля, продолжаем<br>If Dat[9]*m<0 then...<br>-7*9<0 поэтому m:= -7<br>If Dat[10]*m<0 then ....<br>6*(-7)<0 поэтому m присваивается значение 6<br>Ответ: m=6

Answer 2

Анализ кода показывает, что m последовательно принимает значение второго из пары соседних элементов dat, имеющих разные знаки. Последняя такая пара - это -7 и 6. Следовательно m=6.
Ответ: 6