Введите в компьютер программу example2.выполните программу, получите результаты.

program z1;

var x,y: real;

begin

writeln('vvedite x i y');

readln(x,y);

if y=5*x*x-7*x+2 then

writeln('yes');

else

writeln('no');

end;

смотря какая передача и каких данных, много чего придумать можно, мне кажется) телефон, радио, модем,рация. или просто- передатчик.

350*200 = 700000 точек используется в изображении

1 бит 2 цвета4 бита 16 цветов8 бит 256 цветов16 бит 65 000 цветов24 бит 16,7 миллионов цветов.

теперь считай, сколько битов ты выделяешь на точку1 бит = 0.125 байта24 бита = 3 байта

var a: array[1..100] of integer;

i,s: integer;

begin

  randomize;   n: =20;   for i: = 1 to n do begin      a[i]: =random(n*10)- 10*n div 2 ;       write(a[i]: 4);       if i mod 10=0 then writeln;

      if a[i]> =0 then s: = s+a[i];   end;

  for i: = 1 to n do begin

      if a[i]< 0 then a[i]: =s;

      write(a[i]: 4);       if i mod 10=0 then writeln;

  end;

end.