Входы для информации: - гнезда (разъёмы для перефирии)
- CD-DVD-привод
- Дискетки
- Сканирование через принтер
- Ввод с клавиатуры, клик мышкой на опр. знаках
- запись с микрофона- из интернета
Выходы:
- Гнёзда для перефирии
- печать
- в интернет
- мониторы<span> т.д. </span>
I = 16*64*64*8 = 524288 бит = 65536 байт = 64 Кбайт
10102=2в первой степени +2 в 3 степени =8+2=10
1011012=2в 0+2в2+2в3+2в5=1+4+8+64=77
10+77=78
10-77=-67
10*77=770
//PascalABC.Net 3.2
procedure swap (var a1, a2: integer);
begin
var promt:=a1;
a1:=a2;
a2:=promt;
end;
begin
var a:=ReadArrInteger ('Вводите массив: ', readinteger ('Размерность : '));
var i:=-1;
while (i+2)<length (a) do
begin
i+=2;
swap (a[i], a[i-1]);
end;
a.Print;
end.