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
Const n=10 ; m=10;<span>
var A: array [1..n,1..m] of integer;
s, i, j: integer;
begin
randomize;
for i:= 1 to n do
begin
</span>for j:= 1 to m do<span>
begin
A[i,j]:= -100 + random (100);
write (A[i,j]: 5);
end;
writeln;
end;
</span>for i:= 1 to n do
begin
s:=0;
for j:= 1 to m do <span>
if A[i,j] < 0 then s:=s+A[i,j];
</span><span> writeln('s ',i,' столбца=' , s);
end;
end.</span>
Вопросы по горизонтали:
<span>3. То, что мы делаем в Visual Basic </span>
<span>5. Портативный вариант компьютера </span>
<span>7. Графический… для рисования и ввода рукописного текста </span>
<span>9. Сенсорная панель в ноутбуке </span>
<span>10. Универсальное устройство вывода информации </span>
<span>11. То же, что и дисковод </span>
<span>13. В сокращенном варианте – женское имя или устройство ввода информации </span>
<span>16. Спецустройство для вывода сложных графических объектов </span>
<span>18. Шарик у этого «животного» находится сверху размером с мячик для гольфа </span>
<span>19. Он используется для оптического ввода изображений в компьютер </span>
<span>21. Блокбастер о новой компьютерной жизни </span>
<span>24. Они подразделяются на матричные, струйные и лазерные </span>
<span>25. Гибкий магнитный диск </span>
<span>27. Специальная микросхема </span>
<span>29. Хвостатое устройство для компьютера. </span>
<span>30. Бывает арифметическое, логическое, строковое, нецензурное </span>
<span>31. Величина, зависимая от аргументов. </span>
<span>32. Самокопирующийся компьютерный вредитель. </span>
<span>Вопросы по вертикали: </span>
<span>1. Язык программирования и известный математик. </span>
<span>2. Окно, в котором размещаются управляющие элементы. </span>
<span>4. Удаление, копирование, перемещение или вырезание аппендикса. </span>
<span>6. Один из первых языков программирования </span>
<span>7. Одно из свойств программы (синоним слова доходчивость) </span>
<span>8. И процесс решения задачи, и кулинарный рецепт, и инструкция по пользованию стиральной машиной. </span>
<span>12. Мы его преобразуем из начального состояния в конечное. </span>
<span>14. Он выполняет последовательность действий. </span>
<span>15. Алгоритмическая структура, у которой много вариантов серий команд. </span>
<span>17. Алгоритм, записанный на «понятном» компьютеру языке. </span>
<span>19. Встречается и в информатике, а в биологии. кошачье … </span>
<span>20. С ним тело цикла выполняется несколько раз. </span>
<span>22. Язык программирования, названный в честь сотрудницы Ч.Бэббиджа </span>
<span>23. В этой алгоритмической структуре серия команд выполняется в зависимости от истинности условия. </span>
<span>26. Последовательность команд и часть мыльной оперы. </span>
<span>28. Набор однотипных переменных, объединенных одним именем. </span>
<span>Ответы на кроссворд: </span>
<span>По горизонтали: 3.Проек. 5.Ноутбук. 7.Планшет. 9.Тачпад. 10.Монитор. 11.Накопитель. 13.Клавиатура. 16.Плоттер. 18.Трекбол. 19.Сканер. 21.Матрица. 24.Принтер. 25.Дискета. 27.Чипсет. 29.Мышь. 30.Выражение. 31.Функция 32.Вирус. </span>
<span>По вертикали: Паскаль. 2.Форма. 6.Бейсик. 7.Понятность. 8.Алгоритм. 12.Объект. 14.Исполнитель. 15.Выбор. 17.Программа. 19.Семейство. 20.Счетчик. 22.Ада. 23.Вевление. 26.Серия. 28.Массив. </span>
<span>второй кроссворд. </span>
<span>Многоклавишное устройство ввода. </span>
<span>Устройство для сбора, хранения и переработки информации. </span>
<span>Устройство для прослушивания музыки, звука. </span>
<span>Носитель информации, на который записывают программы и данные для хранения. </span>
<span>Устройство для быстрого перемещения по экрану. </span>
<span>Устройство вывода информации. </span>
<span>Печатающее устройство вывода. </span>
110110,1=54,5("10")=36,8("16")=66,4("8")