Описать программные слова которые участвуют в этой программе.Пж хелп program n_3; Var a:...

Question

Описать программные слова которые участвуют в этой программе.Пж хелп program n_3; Var a: array[1..10] of integer; m, i,s: integer; begin randomize; for i := 1 to 10 do begin a[i] := random(+10) + 1; if a[i] > m then m := a[i]; end; for i := 1 to 10 do begin if a[i]=m then s:=s+1; end; writeln(s); end.

Answer 1

Задан массив "а" от 1 до 10

Объявлены целочисленные параметры m , i , s

В программе задан цикл от 1 до 10 где заполняется массив случайными числами от 1 до 10

Далее производится проверка условий внутри цикла, что если массив по i больше m, то m присваивается значение этого массив по i.

Цикл заканчивается

Идёт следом другой цикл от 1 до 10 где внутри цикла производится проверка повторений максимального значения m и производится подсчёт этих значений в параметре s

Выводится s