Const
n=5;
var
a:array[1..n,1..n] of integer;
i,j:integer;
begin
//генератор случайных чисел. Диапазон от 1 до 10.
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(10)+1;
write(a[i,j]," ");
end;
writeln();
end;
//Проверка условия и переприсвоение, если верно.
for i:=1 to n do
for j:=1 to n do
begin
if ((<span>(i+j) mod 2)=0) then
</span> a[i,j]:=a[1,2];
end;
//Вывод полученного массива.
for i:=1 to n do
begin
for j:=1 to n do
begin
write(a[i,j]," ");
end;
writeln();
end;
//Ожидание.
readln();
end.
Компьютеры в интернете различают с помощью IP-адреса(<span>Интернет-протокол) который присваивается компьютеру при подключению к интернету.
Документы в интернете различают по их названию и типу файла</span>
Решено, исходные данные:
<em>a(1)=0 a(2)=1</em>
<em>a(n+2)=a(n+1)</em><span><em>-a(n)</em>
<em>Найди a(885)</em>
<em>Внимание: скобка означает число в нижнем индексе.</em>
Решаем, исходим сразу от наибольшего числа:
</span><em>a(885)=a(884)-a(883)=a(883)-a(882)-a(883)=a(882)
</em>В чем фокус-покус. Сначала мы применили формулу по отношению к числу<em>a(885)</em><span>, а потом к числу </span><em>a(884)</em><span>, из чего получилось равенство </span><em>a(885)=a(882)</em>
Тем самым, мы можем утверждать, что числа в последовательностях будут совпадать каждые 885-882=3 раза. 885 кратно 3, следовательно ищем наименьшее общее кратное число, оно равно 3. Следовательно a(885)=a(3)
<span>Находим </span><em>a(3)</em><span> из формулы:</span><em> a(3)=a(2)-a(1)=1-0=1</em><span>, следовательно </span>a(885)=1
Потому что архивторы работают не со всеми типами файлов