Var
a :array [1..10] of integer;
i :integer;
begin
randomize;
for i:=1 to 10 do
a[i]:= random(9);
<span>end.</span>
Компьютер это электронно вычислительная машина
инструмент это основное средство
цена компьютера это широкий выбор персональных компьютеров
1) var i,d,q:integer;
begin
d:=1;
for q:=5 downto 1 do {можно и for q:=1 to 5 do но у вашем примере идет на спад , я сделал так же}
d:=d+q;
writeln(q,' ',d);
end.
2) var i,d,q:integer;
begin
d:=1;
for q:=4 downto 1 do
d:=d+q;
writeln(q,' ',d);
<span>end.
3) Здесь вовсе не нужен цикл , всеравно переменная станет 1(еденицей)
var i,d,q:integer;
begin
d:=1;
q:=1;
d:=d+q;
writeln(q,' ',d);
<span>end.
4) Будет зацикленость , поскольку не зименяется значение q (либо ошибка в условии)
А так как нет изменений то и переработать нельзя в цикл for</span></span>
Ответ:
=B$1+$C1
Объяснение:
Символ $ фиксирует значение, в результате чего куда бы его ни копировали, 1 символ после $ останется тем же. В вашем условии ошибка. A1=B$1+$C1 => при копировании на одну ячейку ниже в A2 (прибавляем один ко всем числовым значениям) A2=B$1(не меняется)+$C2 => при копировании A1 на один вправо и на два ниже (прибавляем два ко всем числовым значениям и меняем буквы на следующие по алфавиту) в ячейку B3=C$1+$C3
Всего возможных вариантов N=16.
Подставим это в формулу
Таким образом, 4 бит информации несет сообщение