Жақсы жағыда, жаман жағыда бар. Мысалға мектеп те, универде интернетке кіріп шаруаларыңды бітіріп алуға болады. Сымсыз байланыс. Ал жаман жағы
Ғалымдар мұндай шешімге мектеп оқушыларына жүргізілген зерттеуден кейін келді. Олар оқушылар ұйқыға жатқанда жастықтарының астына Wi-Fi желісі қосылған смартфондар салып жүрген. Ертеңінде балалардың денсаулық жағдайын тексеріп, оқушылардан бас ауруды, шаршағандықты байқаған.
Сонымен қатар, үйінде Wi-Fi желісін пайдаланушылар өзінің бөлме өсімдіктеріне назар аударулары тиіс. Өйткені жүргізілген тәжірибе негізінде Wi-Fi желісі өсімдіктерді құртатыны дәлелденді. Қосулы Wi-Fi-модемімен бір бөлмеде тұрған 6 өсімдік түрі 12 күнде-ақ құрғап, сарғая бастаған.
Өңдеу
Кодтау (кодирование; coding; кодировать; encode) — мәліметтерді олардың алдын ала тағайындадған кодтық комбинацияларымен бейнелеу немесе мәліметтер элементін (символдар жиынын) олардың кодтық комбинацияларымен сәйкес келтіру; программалау процесі; 2) ақпараттың 8 биттік (байттық) кодтауын 7 биттік кодтауға түрлендіру. Мұндай түрлендірудің қажеттілігі кейбір желілік программалардың мәліметтерді тек 7 биттік кодтауда жеткізе алатындығынан туындайды. Байттық мәліметгерді осындай арналармен тікелей жеткізу ақпараттың бұрмалануына жол береді; 3) белгілі бір ереже бойынша дискреттік хабарды дискреттік сигнал түріне түрлендіру (аудармалау), яғни шарттаңбаларды қолдану.
Объяснение:
■■
program raf105;
const
n1 = 5;
n2 = 8;
var
a: array[1..n1,1..n2] of integer;
i,j: integer;
begin
for i:=1 to n1 do
begin
writeln;
a[i,1]:= 1+i;
write(a[i,1]:2,' ');
for j:=2 to n2 do
begin
a[i,j]:= a[i,j-1]+1;
write(a[i,j]:2,' ');
end;
end;
end.
№2program raf105;
const
n = 9;
var
a: array[1..n,1..n] of integer;
i,j: integer;
begin
for i:=1 to n do
begin
writeln;
for j:=1 to n do
begin
if j = i
then if i <= 3
then a[i,j]:= 10-j
else a[i,j]:= 10-j-1
else a[i,j]:= 0;
write(a[i,j],' ');
end;
end;
end.
№3program raf105;
const
n = 9;
var
a: array[1..n,1..n] of integer;
i,j,c: integer;
begin
c:= -4;
for i:=1 to n do
begin
if (i<>1) and (i<>9)
then c:= c+1;
writeln;
for j:=1 to n do
begin
if (j=1) or (j=9) or (i=1) or (i=9)
then a[i,j]:= 1
else if (j = 5 - abs(c)) or (j = 5 + abs(c))
then a[i,j]:= 1
else a[i,j]:= 0;
write(a[i,j],' ');
end;
end;
end.
№4program raf105;
const
n1 = 10;
n2 = 9;
var
a: array[1..n1,1..n2] of integer;
i,j: integer;
begin
for i:=1 to n1 do
begin
writeln;
for j:=1 to n2 do
begin
if i mod 2 <> 0
then a[i,j]:= 1
else a[i,j]:= 0;
write(a[i,j],' ');
end;
end;
end.
PascalABC 3.4.2