Uses graphABC;beginsetwindowsize(600,500);setbrushcolor(clgreen);Ellipse(100,430,500,130);setbrushcolor(clNavy); Ellipse(250,260,220,310);Ellipse(350,260,380,310);setbrushcolor(clblack);Ellipse(270,330,330,370);line(300,370,300,400);Arc(300,280,120,220,-40); line(120,240,150,40);line(150,40,280,150);line(280,150,120,240);line(320,150,480,240);line(480,240,450,40);line(450,40,320,150);floodfill(200,100,clblack);floodfill(400,100,clblack);line(50,350,200,350);line(30,340,190,340);line(10,330,180,330); line(410,330,570,330);line(400,340,560,340);line(390,350,550,350); line(250,240,220,150);line(240,240,180,80);line(230,240,180,150); line(350,240,380,150);line(360,240,430,80);line(370,240,430,150); end.
Const
m1 = 20;
n1 = 20;
var
x: array[1..m1, 1..n1] of integer;
i, j, m, n, mx, mn: integer;
begin
Write('Введите через пробел число строк и столбцов матрицы: ');
Readln(m, n);
Randomize;
writeln(#13#10, 'Исходная матрица');
for i := 1 to m do
begin
for j := 1 to n do
begin
x[i, j] := Random(100) - 50;
Write(x[i, j]:5)
end;
Writeln
end;
for i := 1 to m do
begin
mx := x[i, 1]; mn := mx;
for j := 2 to n do
if mx < x[i, j] then mx := x[i, j]
else if mn > x[i, j] then mn := x[i, j];
Writeln('В строке ', i, ' мin=', mn, ', max=', mx)
end
end.
Тестовое решение:
Введите через пробел число строк и столбцов матрицы: 5 8
Исходная матрица
14 35 4 16 44 -14 47 36
-23 -40 16 43 40 48 21 46
23 30 -18 25 -43 -5 -3 37
24 -26 9 -37 36 23 -33 36
30 46 17 -18 -34 -35 36 28
В строке 1 мin=-14, max=47
В строке 2 мin=-40, max=48
В строке 3 мin=-43, max=37
В строке 4 мin=-37, max=36
В строке 5 мin=-35, max=46
Const
n = 10;
var
a: array[1..n] of integer;
i: integer;
begin
Write('Элементы массива: ');
for i := 1 to n do
begin
if (i mod 2) = 0 then a[i] := 3 * i else a[i] := i;
Write(a[i]:3)
end
end.
Тестовое решение:
Элементы массива: 1 6 3 12 5 18 7 24 9 30
Материнская плата – это самая основная плата в системном блоке, которая
определяет производительность компьютера. На материнской плате
устанавливаются основные устройства ПК: процессор, видеокарта, оперативная
память, чипсет, слоты, с помощью шлейфов и кабелей к материнке
подключаться CD-Rom, жесткий диск, дисковод, клавиатура, мышь…
Чтобы правильно подобрать материнскую плату нужно хорошенько изучить
форм-фактор. Это такая плата, которая определяет размер, разъемы питания и
установочные отверстия материнки.
Форм-факторы для материнских плат:
• Advanced Technology eXtended – подходит идеально для сборки домашних ПК;
• micro ATX – подходит для офисных компьютеров;
• mini-ITX.
Чипсет – микросхема, которая обеспечивает подключение к оперативной памяти
процессора. Чипсеты состоят с «Южного» и «Северного» моста».
Сокет – это гнездо, куда на системной плате крепиться процессор.
Процесс выбора материнки:
• выбор поддерживаемого процессора.
• выбор чипсета;
• какие дополнительные функции поддерживает материнская плата;
• выбор производителя.
Все же главным производителем в материнской плате является брэнд. Хоть эти
материнки дороже, но компания зарабатывала свое имя годами, тому и качество
у них высокое.
<span>Что бы Вы не купили, помните, главное в работе – это стабильность.</span>