Задать вопрос
9 августа, 14:18

Объясните, почему он выводит 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.

+2
Ответы (1)
  1. 9 августа, 17:18
    0
    У тебя программа выводит нечётное число. Которое меньше того, что стоит в: if Dat[k] 21, то будет выводить 19
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Объясните, почему он выводит 21, а не 19? Var k, m: integer; Dat: array[1 ... 11] of integer; Begin Dat[1]: = 20; Dat[2]: = 27; Dat[3]: = ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы