ПОМОГИТЕ СРОЧНО! ОТВЕТ ПОДРОБНЕЕ ПЖ! В таблице Dat хранятся положотельные или...

0 голосов
27 просмотров

ПОМОГИТЕ СРОЧНО! ОТВЕТ ПОДРОБНЕЕ ПЖ! В таблице 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.


Информатика (22 баллов) | 27 просмотров
Дан 1 ответ
0 голосов

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

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

(2.2k баллов)
0

Я вводил эту программу. На выходе у меня получилось 6. В чём дело?