Многоуровневый список, имеющего четыре уровня вложенности компьютера.
1. Процессор
2. Память
2.1. Оперативная память
2.2. Долговременная память
2.2.1. Жесткий магнитный диск
2.2.2. Дискета
2.2.3. Флэш-память
2.2.4. Оптические диски
2.2.4.1. CD
2.2.4.2. DVD
3. Устройства ввода
3.1. Клавиатура
3.2. Мышь
3.3. Сканер
3.4. Графический планшет
3.5.Цифровая камера
3.6. Микрофон
3.7. Джойстик
4. Устройства вывода
4.1. Монитор
4.1.1. Жидкокристаллический монитор
4.1.2. Монитор на электронно-лучевой трубке
4.2. Принтер
4.2.1. Матричный принтер
4.2.2. Струйный принтер
4.2.3. Лазерный принтер
Var a = [0, ...] - Множество, состоящее из чисел.
console.log(a) - выводит "a" в консоль.
var f1 = 0 - объявление переменной целого типа и инициализация её нулем.
for(i=0;i<a.length-1;i++) - цикл от нуля до a.length - 1 с шагом 1.
{
if(a[i] >=a[i+1]) { - если "a" iтое больше либо равно "a" iтому + 1 тогда
f1=1; - присваивание переменной f1 числа 1.
break; - остановка цикла.
}
}
if(f1 == 1) { - если f1 равно 1 тогда
for(i=0;i<a.length-1;i+=4) { - цикл от нуля до a.length - 1 с шагом 4.
a[i] *= 2; - значение "a" iтое умножается на 2. (все содержимое a[i])
}
}
Var
i, k, x: integer;
begin
k:=0;
for i:=1 to 10 do
begin
readln(x);
if x mod 2 = 0 then //если x четный
inc(k); //увеличиваем k на 1
end;
writeln('Четных: ', k);
writeln('Нечетных: ', 10-k);
<span>end.</span>
Ввода-клавиатура,мышь, тачпад,граф. планшет, Джойстик,сканер,цифровой фотоаппарат,видеопроектор, вебкамера,микрофон.
остальное вывода это принтер,графопостроитель,аккуст.колонки,наушники,динамик встроенный,
Const a:array[1..10,1..5] of integer = (
(1,2,3,4,5),
(2,2,3,4,5),
(3,2,3,4,5),
(4,2,3,4,5),
(5,2,3,4,5),
(6,2,3,4,5),
(7,2,3,4,5),
(8,2,3,4,5),
(9,2,3,4,5),
(10,2,3,4,5) );
var
i,j:integer;
begin
writeln;
for i := 1 to 10 do
begin
for j:= 1 to 5 do
write(a[i,j],' ');
writeln;
end;
end.