В таблице А представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (А [1] - количество голосов, поданных за первого исполнителя; А [2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. var k, m: integer; A: array(1..10] of integer; pegin A[1] := 20; A[2] := 16; A[3) :- 20; A[4] := 36; A[5] := 15; A[6] := 21; A[7] := 28; A[8] := 17; A[9] := 16; A[10]:= 35; m := 0; for k:= 1 to 10 do if A[k]>A[1] then begin m := m+1 end writeln (m) ; end.

4

Программа считает количество исполнителей, у которых количество голосов больше, чем у первого исполнителя. В данном случае это исполнители под номерами 4, 6, 7 и 10. Таким образом, программа выведет число 4.