1 ответ
Владимир Коретко
1. Так как метод генерации значения циклически повторяется для каждой тройки элементов, разумно привязаться к остатку от деления индекса на 3. Тогда получим следующую формулу:
![\displaystyle a[i]=\left\\beginmatrixamp;10;i,amp; i\mod 3=1 \\ amp;10;a_i-1^2, amp; i\mod 3=2 \\ amp;10;a_i-1 \div 3, amp; i \mod 3=0amp;10;\endmatrix\right.](https://tex.z-dn.net/?f=%5Cdisplaystyle+a%5Bi%5D%3D%5Cleft%5C%7B%5Cbegin%7Bmatrix%7D%0Ai%2C%26+i%5Cmod+3%3D1++%5C%5C+%0Aa_%7Bi-1%7D%5E2%2C+%26+i%5Cmod+3%3D2+%5C%5C+%0Aa_%7Bi-1%7D+%5Cdiv+3%2C+%26+i+%5Cmod+3%3D0%0A%5Cend%7Bmatrix%7D%5Cright. "\displaystyle a[i]=\left\\beginmatrixamp;10;i,amp; i\mod 3=1 \\ amp;10;a_i-1^2, amp; i\mod 3=2 \\ amp;10;a_i-1 \div 3, amp; i \mod 3=0amp;10;\endmatrix\right.")
Тут операция
значит целочисленное разделение.
var
a:array[1..9] of integer;
i:integer;
begin
for i:=1 to 9 do begin
case i mod 3 of
1: a[i]:=i;
2: a[i]:=sqr(a[i-1]);
0: a[i]:=a[i-1] div i
end;
Write(a[i],' ')
end
end.
Итог
1 1 0 4 16 2 7 49 5
2. Здесь формула преображения совершенно простая:
var
a,b:array[1..15] of integer;
i:integer;
begin
randomize;
for i:=1 to 15 do begin
a[i]:=Random(51)-25;
Write(a[i],' ');
b[i]:=a[i]*(a[i]-1)
end;
Writeln;
for i:=1 to 15 do Write(a[i]-b[i],' ');
Writeln
end.
Пример
-6 -14 -13 25 13 21 11 17 -2 -19 -9 25 -11 15 17
-48 -224 -195 -575 -143 -399 -99 -255 -8 -399 -99 -575 -143 -195 -255
Тут операция
var
a:array[1..9] of integer;
i:integer;
begin
for i:=1 to 9 do begin
case i mod 3 of
1: a[i]:=i;
2: a[i]:=sqr(a[i-1]);
0: a[i]:=a[i-1] div i
end;
Write(a[i],' ')
end
end.
Итог
1 1 0 4 16 2 7 49 5
2. Здесь формула преображения совершенно простая:
var
a,b:array[1..15] of integer;
i:integer;
begin
randomize;
for i:=1 to 15 do begin
a[i]:=Random(51)-25;
Write(a[i],' ');
b[i]:=a[i]*(a[i]-1)
end;
Writeln;
for i:=1 to 15 do Write(a[i]-b[i],' ');
Writeln
end.
Пример
-6 -14 -13 25 13 21 11 17 -2 -19 -9 25 -11 15 17
-48 -224 -195 -575 -143 -399 -99 -255 -8 -399 -99 -575 -143 -195 -255
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов