Program massivy;
var array1: array [1..10] of integer;
i, b:integer;
begin
for i:=1 to 10 do
array1[i]:=random(-10, 10);
for i:=1 to 4 do begin
for b:=1 to 4 do
if array1[b] > array1[b+1] then
swap(array1[b], array1[b+1]);
end;
for i:=5 to 9 do begin
for b:=5 to 9 do
if array1[b] < array1[b+1] then
swap(array1[b], array1[b+1]);
end;
for i:=1 to 10 do
writeln(array1[i]);
end.
Интерпретация
Познавательная, раскрывающая
Направляет, изучает, показывает
Интерпретация - это логотип Викисловаря
Истолкование
сообщить учителю и ничего не предпринимать самому....
Способ довольно простой, только надо задать mas[0], пусть оно будет 0
mas[1] = mas[1] + mas[0]*3 = mas[1] = 3
mas[2] = mas[2] + mas[1]*3 = mas[2] + 9 = 14 -> mas[2] = 14-9 = 5
и тд
#Ruby22
mas = [0, 3, 5, 5, 1, 2]
for i in 1..5
mas[i] += mas[i - 1] * 3
end
p mas