Задание
В таблице Dat представлены данные о количестве голосов, поданных за \(10\) исполнителей народных песен
(Dat[\(1\)] — количество голосов, поданных за первого исполнителя; Dat[\(2\)] — за второго и т. д.).
Определи, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.
| Алгоритмический язык алг нач целтаб Dat[\(1\):\(10\)] цел k, m Dat[\(1\)] :\(=\) 79 Dat[\(2\)] :\(=\) 38 Dat[\(3\)] :\(=\) 31 Dat[\(4\)] :\(=\) 38 Dat[\(5\)] :\(=\) 17 Dat[\(6\)] :\(=\) 71 Dat[\(7\)] :\(=\) 48 Dat[\(8\)] :\(=\) 40 Dat[\(9\)] :\(=\) 72 Dat[\(10\)] :\(=\) 55 m :\(= \) \(0\) нц для k от \(1\) до \(10\) если Dat[k] \(\gt\) m то m :\(=\) Dat[k] все кц вывод m кон |
Паскаль Var k, m: integer; Dat: array[\(1\)..\(10\)] of integer; Begin Dat[\(1\)] :\(= \) 79; Dat[\(2\)] :\(= \) 38; Dat[\(3\)] :\(= \) 31; Dat[\(4\)] :\(= \) 38; Dat[\(5\)] :\(= \) 17; Dat[\(6\)] :\(= \) 71; Dat[\(7\)] :\(= \) 48; Dat[\(8\)] :\(= \) 40; Dat[\(9\)] :\(= \) 72; Dat[\(10\)] :\(= \) 55; m :\(= \) \(0\); for k :\(= \) \(1\) to \(10\) do if Dat[k] \(\gt\) m then begin m :\(=\) Dat[k] end; writeln(m); End |
Питон Dat\(=\)[79, 38, 31, 38, 17, 71, 48, 40, 72, 55] m \(=0\) for k in range (\(0\),\(10\)) : if Dat[k] \(\gt\) m : m \(=\) Dat [k] print (m) |
|---|
Ответ:79.