Втаблице ves хранятся данные о весе в килограммах по группе учищихся спортивной школы (ves [1] - вес первого учащегося , ves [2] - вес второго учащегося и т.д). определите, что будет в результате выполнения следующего алгоритма, записанного на трёх алгоритмических языках: алг нач целтаб ves [1: 14] цел i, n ves[1]: = 25; ves[2]: = 21; ves[3]: = 23; ves[4]: = 28; ves[5]: = 30; ves[6]: = 25; ves[7]: = 31; ves[8]: = 28; ves[9]: = 25; ves[10]: = 28; ves[11]: = 30; ves[12]: = 27; ves[13]: = 26; ves[14]: = 24; n : = ves [1] нц для к от 1 до 14 если ves[i] > n то n : = ves [1] все кц вывод n кон dis ves(14) as integer dis i,n as integer ves(1)= 25: ves(2)= 21 ves(3)= 23: ves(4)= 28 ves(5)= 30: ves(6)= 25 ves(7)= 31: ves(8)= 28 ves(9)= 25: ves(10)= 28 ves(11)= 30: ves(12)= 27 ves(13)= 26: ves(14)= 24 n = ves(1) for i = 1 to 14 if ves(i) < n then n : = ves (i) end if next i print n var i, n: integer; ves: array[1..14] of integer; begin ves[1]: = 25; ves[2]: = 21; ves[3]: = 23; ves[4]: = 28; ves[5]: = 30; ves[6]: = 25; ves[7]: = 31; ves[8]: = 28; ves[9]: = 25; ves[10]: = 28; ves[11]: = 30; ves[12]: = 27; ves[13]: = 26; ves[14]: = 24; n : = ves[1]; for i : = 1 to 14 do if ves[i] < n then begin n : = ves[1] end; writeln(n) end.
Сначала производится инициализация массива, в конце - выводится на печать n.
Содержательная часть программы - эта:
n := ves[1];
For i := 1 to 14 Do
If Ves[i] < n Then
Begin
n : = ves[1]
End;
Здесь сначала n равно ves[1], затем в цикле, если ves[i] меньше n, то n присваивается равным ves[1]. Если бы было присвоение ves[i], то получился бы алгоритм поиска минимального элемента (ответ был бы 21 = min[25, 21, 23, 28, 30, 25, 31, 28, 25, 28, 30, 27, 26, 24]). Но здесь вне зависимости от значений всегда присваивается n = ves[1], поэтому в n в любой момент времени записан первый вес (25), он и будет выведен на экран.
ответ: 25