Объясните, почему он выводит 21, а не 19? Var k, m: integer; Dat: array1 … 11 of integer; Begin Dat1: = 20; Dat2: = 27; Dat3: = 19; Dat4: = 28; Dat5: = 26; Dat6: = 22; Dat7: = 24; Dat8: = 28; Dat9: = 26; Dat10: = 21;

Вопрос от пользователя: Коня

Объясните, почему он выводит 21, а не 19?

Var k, m: integer;

Dat: array[1 … 11] of integer;

Begin

Dat[1]: = 20;

Dat[2]: = 27;

Dat[3]: = 19;

Dat[4]: = 28;

Dat[5]: = 26;

Dat[6]: = 22;

Dat[7]: = 24;

Dat[8]: = 28;

Dat[9]: = 26;

Dat[10]: = 21;

Dat[11]: = 27;

m : = 0

for k : = 1 to11 do

if Dat[k] < 25 then begin m : = Dat[k]; end; writeln (m); End.

Ответ: Самсоний

У тебя программа выводит нечётное число. Которое меньше того, что стоит в: if Dat[k] 21, то будет выводить 19