Впрограмме описан одномерный целочисленный массив a с индексами от 0 до 10. ниже представлен фрагмент этой программы, в котором значения элементов массива сначала , а затем меняются for i : = 0 to 10 do a[i] : = i: for i : = 0 to 5 do begin a[5-i] : = a[5+i]: a[2+i] : = a[10-i]: end. чему будут равны элементы этого массива? 1) 10 9 8 7 8 7 6 7 8 9 10 2) 9 8 7 6 5 9 8 7 6 5 10 3) 10 9 8 7 6 10 9 8 7 6 10 4) 10 9 8 7 6 5 6 7 8 9 10

👇

Ответ:

Витуся091

06.11.2022

Сначал массив заполнится так:
a[0]=0
a[1]=1
a[2]=2

a[10]=10
во втором цикле:
i=0
a[5]=a[5]
a[2]=a[10]
получим, что a[2]=10 и a[10]=10
i=1
a[4]=a[6]
a[3]=a[9]
получим, что a[3]=9; a[9]=9; a[4]=6; a[6]=6
i=2
a[3]=a[7]
a[4]=a[8]
получим, что a[3]=7; a[7]=7; a[4]=8; a[8]=8
i=3
a[2]=a[8]
a[5]=a[7]
получим: a[2]=8; a[8]=8; a[5]=7; a[7]=7
i=4
a[1]=a[9]
a[6]=a[6]
получим: a[6]=6; a[1]=9; a[9]=9
i=5
a[0]=a[10]
a[7]=a[5]
получим: a[0]=10; a[10]=10; a[7]=7; a[5]=7
полученный массив:
a[0]=10
a[1]=9
a[2]=8
a[3]=7
a[4]=8
a[5]=7
a[6]=6
a[7]=7
a[8]=8
a[9]=9
a[10]=10
10 9 8 7 8 7 6 7 8 9 10
ответ: 1

4,6(69 оценок)

Открыть все ответы

Ответ:

ащна

06.11.2022

Носитель информации - это любой материальный объект, используемый для закрепления и хранения на нем информации.
В современном обществе можно выделить три основных вида носителей информации:
1) бумажный;
2) магнитный;
3) оптический.
Бумажные носители информации.
Одним из самых распространенных носителей информации является бумага. В школе мы записываем информацию в тетради, теоретический материал изучаем по учебникам, при разработке доклада, реферата или другого сообщения необходимые сведения мы находим в других источниках (книгах, энциклопедиях, словарях и т. д) , которые в свою
очередь являются бумажными носителями информации
Первые вычислительные машины работали на перфокартах. Перфокарты делали из плотной бумаги- картона, на которые по определенному правилу с специального «станка» - перфоратора наносили отверстия в виде
небольших дырочек.
Магнитные носители информации
В 1928 году была изготовлена первая магнитная лента. Наши бабушки и дедушки слушали музыку на магнитофонах с магнитной лентой, которую называли «Бабина» .
Магнитная лента оказалась достаточно надежным, долговечным и доступным каждому носителем информации.
В первых ЭВМ (электронно- вычислительных машинах) информация хранилась на магнитных лентах и магнитных дисках
В современных компьютерах в качестве носителя информации используются следующие магнитные носители :
1) дискета (на которую можно поместить данные 3000 перфокарт) .
. Внутри пластмассового корпуса расположен гибким магнитный диск, поверхность которого покрыта специальным магнитным веществом. Информация записывается на обе его поверхности. Чтобы при работе с дискетой ее не надо было переворачивать, внутри флоппи-дисковода (устройства, которое записывает или считывает информацию с дискеты) имеется две магнитные головки, каждая для своей стороны дискеты. Такой диск требует особого обращения, магниты, повышенная температура и влажность разрушают хранящуюся на нем информацию.
2) жесткий магнитный диск или винчестер ( хранит 100 000 и более дискет) . Внутри жесткого металлического корпуса находятся несколько десятков дисков магнитных дисков, размещенных на одной оси . Запись или считывание информации обеспечивается несколькими магнитными головками. В целях сохранения информации и работо жесткие магнитные диски необходимо оберегать от ударов и резких изменений положений системного блока (нельзя наклонять и переворачивать в процессе работы) .
3) стриммеры (стрим-картриджи) - устройства, обеспечивающие запись или считывание звуковой информации . Внутри данного носителя находится магнитная лента.
Оптические носители информации
Самым распространенными носителями информации являются оптические или лазерные диски .
Лазерные диски изготавливают из пластмассы, сверху покрывают тонким слоем из металла и прозрачным лаком, защищающим от незначительных царапин или загрязнений. Запись или считывание информации в CD-дисководе осуществляется с света лазера. При записи лазерный луч выжигает на поверхности диска микроскопические углубления, кодируя тем самым информацию (при считывании -лазерный луч отражается от поверхности вращающегося диска) . Такие диски следует оберегать от пыли и царапин.
Различают CD и DVD диски.

4,6(55 оценок)

Ответ:

okru24057p00ymy

06.11.2022

1)
var
n:integer;
begin
readln(n);
if(n<0)then write(0)
else write(n+4);
end.

2)
var
a, b: integer;
begin
readln(a, b);
if(a = b) then
write(1)
else
write(0);
end.

3)
var
a, b, c, s: integer;
begin
s := 0;
readln(a, b, c);
if(a >= 0) then s := s + 1;
if(b >= 0) then s := s + 1;
if(c >= 0) then s := s + 1;
write(s);
end.

4)
var
a, b, c, s: integer;
begin
s := 0;
readln(a, b, c);
if(a > 0) then s := s + a;
if(b > 0) then s := s + b;
if(c > 0) then s := s + c;
write(s);
end.
5)
var
a, b, c: integer;
begin
readln(a, b, c);
if (a < b) then swap(a, b);
if (a < c) then swap(a, c);
if (b < c) then swap(b, c);
write(a, ' ', b, ' ', c);
end.

6)
var n, k, s, i: integer;
begin
s := 0;
readln(n, k);
for i := 1 to n.ToString.Length do
if(strtoint(n.ToString[i]) > k) then s := s + strtoint(n.ToString[i]);
write(s);
end.

7)
var n, s, i: integer;
begin
s := 0;
readln(n);
for i := 1 to n do
s := s + i;
write(s);
end.

9)
var n, i: integer;
begin
readln(n);
for i := n downto 1 do
write(i);
end.

12
var
n, i: integer;
s: real;
begin
s := 0;
readln(n);
for i := n downto 1 do
s:=s+(0.1*i);
write(s);
end.

13)
var n, i: integer;
begin
readln(n);
for i := 1 to n do
write(sqr(i), ' ');
end.

14)
var
n, i, c: integer;
begin
i := 1;
c := 0;
readln(n);
while (c <> n) do
begin
if(i mod 3 = 0) then begin write(i, ' ');c := c + 1; end;
i := i + 1;
end;
end.

15)
var
n, i, a: integer;
c: real;
begin
i := 1;
c := 0;
readln(n);
for i := 1 to n do
begin
read(a);
c := c + a;
end;
write(c / n)
end.

16)
var
n, i, a: integer;
begin
i := 1;
while true do
begin
read(a);
if(a = 0) then break;
n := n + 1;
end;
write(n)
end.

4,6(18 оценок)

Это интересно:

Компьютеры-и-электроника

28.03.2021

Как удалить историю веб поиска в Google: простые шаги для защиты вашей конфиденциальности...

Дом-и-сад

27.10.2021

Как найти распределительный щиток или блок предохранителей...

Мир-работы

05.04.2023

Как пережить увольнение: советы профессионалов...

Дом-и-сад