Монитор (т); Е; клавиатура (к); сканер (с); принтер (т)
текст (Г)
Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.
Компьютеры от компании apple.
Var x,y,u:real;
function min(a,b:real):real;
begin
if a>b then min:=b else min:=a;
end;
begin
write('x=');read(x);
write('y=');read(y);
u:=min(x+y,x*y);
writeln(u);
<span>end.</span>
До сборки комплектующие компьютера не образуют систему, после сборки образуют (т.к. взаимодействуют между собой), после выключения компьютера также образуют систему.