Var
a: array[1..10] of integer;
i, max: integer;
begin
for i := 1 to 10 do
begin
read(a[i]);
if (i = 1) or (a[i] > max) then
max := a[i];
end;
writeln('Max value = ', max)
end.
2 Вещество - это то, из чего состоит физическое тело, то есть окружающие предметы.
3 Дома,на работе ( в школе ) , на улице , те же фонари , машины , вывески магазина.
4 Информационный процесс — процесс получения, создания, сбора, обработки, накопления, хранения, поиска, распространения и использования информации
5 Хранение информации, передача информации, обработка информации
6 Имея органы чувств, животные и растения воспринимают информацию. Например, цветы, получив информацию о наступлении темноты, закрывают свои бутоны. А животные по звуку могут определить приближение опасности. Информационные сигналы могут быть различной природы. Это могут быть звуки, свет, запахи, температура и химический состав среды, вспышки света. Растения и животные не могли бы нормально функционировать, если бы не получали и не использовали информацию об окружающей среде.
7 Решение задачи, перевод текста.
For всегда равен нулю, если делимое меньше делителя. Взятие остатка mod вычисляется остатка полученный при выполнении целичесленного делителя
Function fact(n As Integer) As Long
Dim i As Integer, p As Long
p = 1
For i = 2 To n
p = p * i
Next i
fact = p
End Function
Sub Test()
Dim n As Integer, s As Long, i As Integer
s = 0
n = CInt(InputBox("Введите число n"))
For i = 1 To n
s = s + fact(i)
Next i
MsgBox s
End Sub
Номер четыре - сначала музыка, т.к. все последующие ответы относятся к музыке. Дальше - классика, т.к. мы выделили только один жанр среди всех остальных музыкальных жанров. Дальше - серенада, т.к. это производное от классики, а Моцарт - композитор, получается музыка, классика, серенада, Моцарт, но т.к. серенада есть только в неверном ответе, выбери В.
Номер двадцать четыре - 4500 страниц.
Номер сорок один - 170 тысяч.