Уровень - Применение 1. Необходимо объединить компьютеры в многоквартирном
доме с несколькими подъездами. Какую топологию сети вы-
берете? Какой тип кабеля? С какими средствами передачи?
Обоснуйте свой выбор.
2. Какой тип сети вы бы выбрали для объединения трех смарт-
фонов среди друзей? Обоснуйте свой выбор.
3. Скорость передачи данных через ADSL-соединение равна
256 000 бит/с. Передача файла через данное соединение заня-
ла 3 мин. Определите размер файла в килобайтах.
(ответ: 5625 Кбайт.)
4. Скорость передачи данных через ADSL-соединение равна
128 000 бит/с. Через данное соединение передают файл paзмe-
ром 625 Кбайт. Определите время передачи файла в секундах.
(ответ: 40 с.)
5. Скорость передачи данных через ADSL-соединение равна
1 024 000 бит/с. Передача файла через данное соединение за-
няла 5 с. Определите размер файла в килобайтах.
(ответ: 625 Кбайт.)

Показать ответ

Ответ:

YankaManky

09.04.2023 10:26

program r;
const n=20;
var mas:array [0..n,0..n] of byte;
i,j,g,m,a,x1,y1,x2,y2,maxx,maxy,minx,miny:integer;
begin

readln (a);
for i:=1 to n do
for j:=1 to m do
mas[i,j]:=0;

for g:=1 to a do
begin
Readln (x1,y1,x2,y2);
if x1>x2 then begin maxX:=x1;minX:=x2;end
else begin maxX:=x2; minX:=x1; end;
if y1>y2 then begin maxY:=y1;minY:=y2;end
else begin maxY:=y2; minY:=y1;end;

m:=0;
for i:=miny+1 to maxy do
for j:=minx+1 to maxx do
if mas[i,j]=0 then begin mas [i,j]:=1;m:=m+1;end;
for i:=1 to n do
begin
for j:=1 to n do
write (mas[i,j]);
writeln;
end;
writeln (m);

end;
end.

0,0(0 оценок)

Ответ:

Ashhhhhhhhhhhhh

20.11.2020 10:19

Program Planet;

var
R1, R2, l1, l2, v1, v2, time1, time2 : real;
c, b : string;

begin
Write('Планета1-');
Readln(b);
Write('Планета2-');
Readln(c);
Write('R1=');
Readln(R1);
Write('R2=');
Readln(R2);
Write('v1=');
Readln(v1);
Write('v2=');
Readln(v2);
L1:=2*Pi*R1;
L2:=2*Pi*R2;
Time1:=l1/v1;
Time2:=l2/v2;
Writeln('Продолжительность года на пленете ',b,'= ', Time1:0:2, ' суток');
Writeln('Продолжительность года на пленете ',c,'= ', Time2:0:2, ' суток');
end.