запишіть який обсяг двійкового (у байтах) при 16-бітовому кодуванні має повідомлення інформаційний простір україни​

ну можно, если на паскале, в одной прописать асижн (вызов файла), реврайт, записать туда переменные. а в другой программе прописать чтение переменной из файла, если ты об а так например импорт-экспорт есть во многих прогах (оффис вот

16 - 2^4 - 4 бита = 0.5байт

256 - 2^8 - 8 бита = 1байт

128 - 2^7 - 7 бита

4 - 2^2 - 2 бита = 0.25байт

512*1024*8 =  4`194`304 бит

640*480 = 307`200 бит

4 - 6

16 - 3

128 - 1

256 - 1

var a,b,c,s: real;

begin

  read(a,b);

  c: =sqrt(sqr(a)+sqr(b));

  s: =0.5*a*b;

  write('гипотенуза треугольника равна: ',c,', площадь равна: ',s);

end.

вот программа

var n,cost: real;

begin

  writeln('введите, сколько квт/ч клиент израсходовал');

  readln(n);

  if n< =250 then begin cost: =7*n; writeln('плата равна: ',cost); end;

  if (n> 250) and (n< =300) then begin cost: =17*n; writeln('плата равна: ',cost); end;

  if n> 300 then begin cost: =20*n; writeln('плата равна: ',cost); end;

end.