В таблице Dat представлены данные о численности обезьян в зоопарке (Dat[1] — число обезьян в 2001 году; Dat[2] — в 2002 году и т. д.). Определи, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
Алгоритмический язык
Бейсик
алг
нач
целтаб Dat[1:10]
цел k, q
Dat[1]:=16
Dat[2]:=22
Dat[3]:=24
Dat[4]:=48
Dat[5]:=14
Dat[6]:=19
Dat[7]:=29
Dat[8]:=9
Dat[9]:=12
Dat[10]:=40
q:=0
нц для k от 1 до 10
если Dat[k]>q то
q:=Dat[k]
все
кц
вывод q
кон
Алгоритмический язык
Бейсик
алг
нач
целтаб Dat[1:10]
цел k, q
Dat[1]:=16
Dat[2]:=22
Dat[3]:=24
Dat[4]:=48
Dat[5]:=14
Dat[6]:=19
Dat[7]:=29
Dat[8]:=9
Dat[9]:=12
Dat[10]:=40
q:=0
нц для k от 1 до 10
если Dat[k]>q то
q:=Dat[k]
все
кц
вывод q
кон
More Questions From This User See All
Answers & Comments
Ответ:
48
Объяснение:
"целтаб Dat[1:10]" - Создаём таблица Dat содержащая 10 элементов целого типа.
"цел k, q" - создаём 2 переменные целого типа.
После для каждого элемента таблицы Dat задаётся целое значение
(Dat[1]:=16, Dat[2]:=22, Dat[3]:=24, ...)
"q:=0" - присваиваем значение 0 переменной q
"нц для k от 1 до 10" - начинаем цикл для переменной k, которая принимаем значения от 1 до 10 включительно.
"если Dat[k]>q то" проверяем условие, что элемент таблицы по индексу k больше q.
"q:=Dat[k]" - если выполняется условие, то переменная q принимает значение рассмотренного элемента таблицы Dat. Таким образом будет найдено наибольшее значение среди элементов таблицы Dat.
"вывод q" - выводим значение переменной q.
Наибольшее среди элементов таблицы Dat - 48