// PascalABC.NET 3.0, сборка 1160 от 05.02.2016 begin var a:=ReadArrReal('Введите 9 чисел:',9); var imax:=0; for var i:=1 to 8 do if abs(a[i])>abs(a[imax]) then imax:=i; Writeln('Наибольшее по модулю: ',a[imax]) end.
1. Теория хаоса тебе в т. к. на счёт этого ты должна сама подумать. 2. До сборки - Да. Любое устройство в компе ожидает входные данные, дальше как то их обрабатывает и выдаёт обратно, алгоритмы обработки обсалютно разные для каждого устройства (жёсткий, оперативка, bios) После - тем более да, так как без системы каждый элемент компа бессмыслен и бесполезен. Каждый из них дополняет друг друга. После включения - да, вся система начинает реагировать как то и отвечать (выходные сигналы - принтер, экран, вибрация на джойстике, загорается лампочка на камере когда идёт чтение видео с камеры) 3. Свойства зависят от внутренних параметров каждого компонента. На примере компа - частота процессора обеспечивает с какой скоростью обрабатываются данные, оперативка - сколько памяти храниться в ней для быстрого вызова и передачи на процессор, на жёстком его объём и скорость чтения/записи. Каждый компонент важен в системе, есть ключевые (процессор, опертивка) от которых многое зависит, а есть не особо зависимые параметры компонета (объём жёсткого) . И т. д. и т. п. Надеюсь дал более менее развёрнутый ответ.
Const n=5; var a:array[1..n,1..n] of integer; i,j,d,k,l,m:integer; begin k:=1; i:=1; j:=1; a[i,j]:=1; d:=n-1; for l:=1 to d do begin k:=k+1; j:=j+1; a[i,j]:=k; end; for m:=1 to n div 2 do begin for l:=1 to d do begin k:=k+1; i:=i+1; a[i,j]:=k; end; for l:=1 to d do begin k:=k+1; j:=j-1; a[i,j]:=k; end; d:=d-1; for l:=1 to d do begin k:=k+1; i:=i-1; a[i,j]:=k; end; for l:=1 to d do begin k:=k+1; j:=j+1; a[i,j]:=k; end; d:=d-1; end; for i:=1 to n do begin for j:=1 to n do write(a[i,j]:4); writeln; end; end.
begin
var a:=ReadArrReal('Введите 9 чисел:',9);
var imax:=0;
for var i:=1 to 8 do
if abs(a[i])>abs(a[imax]) then imax:=i;
Writeln('Наибольшее по модулю: ',a[imax])
end.
Тестовое решение:
Введите 9 чисел: 7 13 0 -4 8 13 -7 -14 2
Наибольшее по модулю: -14