Question

ответ подробнее ! в таблице 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] : = 1; dat[6] : = -10; dat[7] : = 9; dat[8] : = 8; dat[9] : = -7; dat[10] : = 6; m : = 1; for k: = 1 to 10 do if dat[k]*m < 0 then begin m : = dat[k] end; writeln(m); end.

Answer 1

На экран будут напечатаны все отрицательные числа. То есть:
Dat[3] := -3;
Dat[6] := -10;
Dat[9] := -7;

В консоли, при выполнении программы, вы увидите:
-3
-10
-7