)накопитель, в котором информация считывается с лазера 1)выберите один ответ: 1. флэш-память 2. винчестер 3. флоппи-диск 4. cd-rom 2)параметры устройств эвм, влияющие на ее быстродействие выберите один или несколько ответов: 1. тактовая частота микропроцессора 2. частота развертки монитора 3. разрядность эвм 4. объем оперативной памяти

1) cd-rom 2) 1. тактовая частота микропроцессора       4. объем оперативной памяти

извини, но из языков программирования которые пишут на знаю только 1с и это как по мне издевательство

пишу на старом добром паскале

 

var a,b,min,max: real;

  read(a,b);

  if (a < b) then begin

      min: =a;

      max: =b;

      a: = (min+max)/2;

      b: =min*max;

  end

  else begin

      min: =b;

      max: =a;

      b: = (min+max)/2;

      a: =min*max;

  end;

  writeln(a,b);

end.

 

 

#include < iostream>

 

using namespace std;

 

int main()

{

  int n;

  int i1=0,i2=0;

  cin> > n;

  for(int i=0; i< n; i++)

  {

  int a = rand()%11-5;

  if(a< 0)

    i1++;

  if(a> 0)

    i2++;

  }

  cout< < "> 0 - "< < i2< < endl< < "< 0 - "< < i1< < endl< < "! =0 - "< < i1+i2< < endl;

  system("pause");

}

 

p.s. можно решить не только через  turbo pascal.

 

turbopascal(может не верно)

 

var

a,n, i1, i2, i: integer;

begin

  n : = 42;

  for i: =1 to n do begin

  a: =random(11)-5;

  if a > 0 then

    i1 : = i1 + 1;

  if a < 0 then

    i2 : = i2 + 1;

  end;

  writeln(">   0-", i1);

  writeln("<   0-", i2);

  writeln("< > 0-", i1+i2);

end.