В таблице 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.