1. Ақпараттың ең кіші бөлігі қалай аталады? 2. Деректер жіберу жылдамдығы деген не?
3. Хабардың ақпараттық көлемі деп нені айтамыз?
4. Ақпарат тасымалдаушылардың сыйымдылығының маңызы неде?
5. Ақпаратты бір өлшем бірліктен екінші өлшем бірлікке өткізу ретін
айтып бер.
6. Әртүрлі дереккөздердегі (газет, журнал, кітап) ақпараттың өлшемдерін
анықтау әдісін түсіндір.
7. Әртүрлі өлшем бірліктердің өзара қандай ортақ қасиеттері болады?
1) Модель - это упрощённая копия чего - либо. Моделирование - создание моделей. В его основе - упрощение и повторение. 2) Модель здания, модель автомобиля, например - игрушки детей это модели. 3) Внутри компьютера можно создать более точные модели, а также - там это гораздо проще. Также в компьютере можно испытать модель в симуляции. 4) Модуляция - упрощение. Демодуляция - усложнение. 5) Их нельзя потрогать, увидеть (Только в схеме), но можно понять. 6) Имеющая свойственную этой модели структуру, модель.
i, j, k : integer;
a : array [0..9,0..9] of char;
procedure U(i,j:integer);
var c : char;
begin
c:=a[i,j]; a[i,j]:=' ';
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
if (c='B')and(a[i+1,j]='W') then U(i+1,j);
if (c='W')and(a[i-1,j]='B') then U(i-1,j);
if (c='B')and(a[i-1,j]='W') then U(i-1,j);
if (c='W')and(a[i,j+1]='B') then U(i,j+1);
if (c='B')and(a[i,j+1]='W') then U(i,j+1);
if (c='W')and(a[i,j-1]='B') then U(i,j-1);
if (c='B')and(a[i,j-1]='W') then U(i,j-1);
end;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to 8 do begin for j:=1 to 8 do
read(a[i,j]);
readln
end;
for i:=1 to 8 do
begin
a[0,i]:=' '; a[9,i]:=' '; a[i,0]:=' '; a[i,9]:=' '
end;
k:=0;
for i:=1 to 8 do
for j:=1 to 8 do
if a[i,j]<>' ' then
begin
k:=k+1; U(i,j)
end;
write(k);
close(output)
end.