Втаблице dat хранится положительные или отрицательные целые числа. определите, что будет напечатано в результате работы следующей программыю. текст программы на пяти языках программирования. паскаль var k, m: integer; dat: array[1..10] of integer; begin dat[1]: = -5; dat[2]: = 4; dat[3]: =
-3; dat[4]: = 2; dat[5]: = 7; dat[6]: = -1; dat[7]: = 9; dat[8]: = 8; dat[9]: = 7; dat[10]: = 4; m: = 0; for k: = 1 to 10 do begin if dat[k]*m < 20 then begin m: = dat[k] end; wrieln(m); end.