Расположите велечени в пор,дке возрастания 512 битов , 500 байтов , 2 бита ,50 байтоа , 0.5 кбайта заполните - id941484520221115 от Ппмммммммм 15.11.2022 12:30

Question

Информатика: Расположите велечени в пор,дке возрастания 512 битов , 500 байтов , 2 бита ,50 байтоа , 0.5 кбайта заполните пропуски а) 10240 битов = байтов = кбайтов в ) 14336 битов = байтов = кбайтов 3 ) некоторый алфавит состоит из 64 символов . в сообщении 60 символов . определите информационный объем сообщения 4 сообщение объемом 77 байтов состоит из 88 символов. найдите мощность алфавита , на которрм написано сообщение

Ппмммммммм · Accepted Answer

Program z3;  Var y: array [1..15] of real;      g: array [1..20] of real;      i,d, a,b: integer; sum, sum_2: real;Begin  writeln( Введите оплату труда за день ); read(d);  a:= 0;  b:= 0;  for i := 1 to 15 do  begin    y[i] := random (30);    if (y[i] 10) then a:= a + 1;    y[i] := y[i] * d * 0.8;  end;      for i:=1 to 20 do    g[i] := random (30);    if (g[i] 10) then b:= b + 1;    g[i] := g[i] * d * 0.8;    for i:=1 to 15 do  begin    writeln( Сотрудник y_ ,i, - ,y[i]);    sum:= sum + y[i]; ...

MOGZ ответил