Отношение количества передаваемой информации ко времени, затраченному на передачу​

на выходе 109

program p_1; var x,y: real; beginwriteln ('vvedite x'); readln(x); writeln ('vvedite y'); readln(y) ; if x=1 then y: =3; {на всякий случай, мало ли по клавише тне никак не можно ставить другие значения. эту строчку можно и }x: =y-x; y: =2*x; x: =2*y+x; y: =y+x/2; writeln(x,'',y); readln; end.

program g; vara, b : integer; n : integer; s : integer; z: array[0..16] of integer; i : integer; v: integer; begina: =(-20); b: =20 ; n: =16 ; for i : = 1 to n dobegins : = trunc(random(b-a)+a); writeln (i: 2,'-е случайное число: ',s: 4); end; beginwriteln('індексы элементов кратных 3: '); for v: =0 to 16 do begin z[v]: =random(40)-20; if z[v] mod 3 = 0 then write(v, ' ') end; end; end.

uses crt; var n,i: integer; a: array[1..1000] of integer; beginread(n); for i: =1 to n do read(a[i]); for i: =1 to n do beginif a[i]< 0 then a[i]: =abs(a[i]); for i: =1 to n do write(a[i],' '); end.

100010,011101=42,35   (вос. сис.)

10010,011101=22,1d   (шест. с.)

  111 111 111 000 001=77701(в.с)

  0111 1111 1100 0001(добавляем 0)=7fc1 (ш.с.)

0,000110101=0,065(в.с) (доб. 00)

0,0110101=0,35(ш.с.) 

0,11 100 110 101=0,3465(в.с.)

0,111 0011 0101=0,735(ш.с.)