Question

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1:10] цел к, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 12 Dat[9] := 15 Dat[10] := 35 m := 0 нц для к от 1 до 10 если Dat[к] < 25 то m : = m+1 все КЦ вывод m КОН DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 16: Dat(2) = 20 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 21 Dat(7) = 28: Dat(8) = 12 Dat(9) = 15: Dat(10) = 35 m = 0 FOR k := 1 TO 10 IF Dat(k) < 25 THEN m =m+1 ENDIF NEXT k PRINT m Var k, m: integer; Dat: array[1...10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 12; Dat[9] := 15; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] < 25 then begin m := m+1 end; writeln(m); End.

Answer 1

Правильный ответ 7. Алгоритм считает сколько исполнителей набрали меньше 25 голосов. Это 1-й,2-й,3-й,5-й,6-й,8-й,9-й всего таких - 7

Answer 2

Программа представлена на трех языках программирования: Бейсик, Паскаль и алг. Ниже приведен текст программы на каждом из этих языков:

Бейсик: ``` нач цел таб Dat[1:10] цел к, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 12 Dat[9] := 15 Dat[10] := 35 m := 0 для к от 1 до 10 если Dat[к] < 25 то m := m + 1 все КЦ вывод m КОН ```

Паскаль: ``` DIM Dat(10) AS INTEGER DIM k, m AS INTEGER Dat(1) := 16 Dat(2) := 20 Dat(3) := 20 Dat(4) := 41 Dat(5) := 14 Dat(6) := 21 Dat(7) := 28 Dat(8) := 12 Dat(9) := 15 Dat(10) := 35 m := 0 FOR k := 1 TO 10 IF Dat(k) < 25 THEN m := m + 1 ENDIF NEXT k PRINT m ```

алг: ``` Var k, m: integer; Dat: array[1...10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 12; Dat[9] := 15; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] < 25 then begin m := m + 1 end; writeln(m); End. ```

В данной программе представлены данные о количестве голосов, поданных за 10 исполнителей народных песен. Количество голосов для каждого исполнителя указано в массиве `Dat`. Программа считает количество исполнителей, у которых количество голосов меньше 25, и выводит это число.

Чтобы определить, какое число будет напечатано в результате работы программы, нужно выполнить программу и проанализировать ее логику.

В данном случае, программа проходит по массиву `Dat` и считает количество исполнителей, у которых количество голосов меньше 25. Затем она выводит это количество.

Исходя из данных в программе, можно определить, что количество исполнителей с количеством голосов меньше 25 равно 7.

Пожалуйста, обратите внимание, что информация о количестве голосов для каждого исполнителя представлена в программе и необходима для определения результата.