10100(2)-1*2^4+0*2^3+1*2^2+0*2^1+0*2^0
Program dlksjijh;
var
A: array[1..40] of integer;
i: integer;
begin
randomize;
writeln('исходные данные:');
for i := 1 to 40 do
begin
A[i] := Random(21);
write(A[i], ' ');
end;
writeln;
writeln('преобрезованный массив:');
for i := 1 to 40 do
begin
if A[i] mod 2 = 0 then
A[i] := Round(A[i]/2)
else
A[i] := A[i] * 3;
write(A[i], ' ');
end;
end.
Имена математических операций - с прописной буквы, и, поскольку есть Random(), то самой первой строкой программы должна быть команда randomize, то есть активация генератора случайных чисел.
У меня работает.
Ответ:
1. =A3*$B$3
2. =$B$1+$B$3 (не изменится)
3. =A5-B6
4. =B3+$A$1
Объяснение:
Во всех задачах при копировании строка увеличивается на 2 (с 1 на 3-ю)
а столбец не изменяется (С)
Поэтому при копировании столбец (буква) меняться не будут, а строка (цифра) будет меняться, если перед ней нет знака "$"
"$" в ссылке перед столбцом или строкой означает, что этот столбец или строка не изменяется при копировании