В 1 это 4) а дальше должно быть в учебнике
Const n =5;
var
a:array[1..n] of integer;
i,max:integer;
begin
writeln('Введите 1 элемент массива');
readln(a[1]); max:=a[1];
for i:=2 to n do begin
writeln('Введите ', i,' элемент массива');
readln(a[i]);
if a[i]>max then max := a[i];
end;
writeln('Максимальный элемент массива равен ',max);
end.
Тестовое решение:
Введите 1 элемент массива
21
Введите 2 элемент массива
56
Введите 3 элемент массива
12
Введите 4 элемент массива
24
Введите 5 элемент массива
15
Максимальный элемент массива равен 56
36 часов понадобится,так как столб 60 см,с 12 до 24 улитка ползёт 25 см,с 00 до 12 улитка ползёт 10 см,и с 12 до 24 улитка ползёт 25 см,склади 25+25+10=60 см
14. Вася,Галя,Толя,Миша,Лена
Так, как тест приведен в вопросе, он содержит 59 символов.
Тогда его информационный объем составит 16×59 = 944 бита или
944/8 = 118 байт.
Поскольку такого ответа нет, скорее всего потерялся один пробел, т.е. символов 60 и они займут 60×16 =<u> 960 бит</u>