aguliaeva
?>

Какие драйвера нужны после переустановки windows 7 на компьютер

Информатика

Ответы

savva-vika
Все которые были установлены ранее.
Анна гутлина

В самом банкомате находится компьютер, он работает под управлением специальной операционной системы и позволяет инженерам корректировать работу АТМ - от англ. Automated teller machine.

В платежный терминал точно так же встроен компьютер. Управляется самым обычным компьютером на базе процессора AMD Sempron 2500, с жестким диском объемом 80 GB, оперативной памятью 512 MB и интегрированными в материнскую плату сетевым и звуковым адаптерами. Под операционной системой Windows XP.

B игровой приставке находятся те же самые комплектующие от компьютера. Вот только загвоздка в том, что в приставках своё программное обеспечение, оптимизированное под игровые нужды.

Планшет можно назвать «компьютером» только в широком смысле этого слова. Различия с ПК существенны. И стать полноценной заменой даже не отличающемуся производительностью пк планшет не может.

Думаю больше всего тут подходит именно игровая приставка, так как это тот же ПК, только более компактный и под управлением другой операционной системы

mary---jane49
//Когда Глеб расстроился
//Pascal ABC.NET 3.1 сборка 1256

Var
 a,b,c,d,e:real;
 
procedure cube(a,b,c,d,e:real);
Var
 p,q,delta,phi,i:real;
 y:array[1..3] of real;
begin
p:=(3*a*c-sqr(b))/(3*sqr(a));
q:=(2*power(b,3)-9*a*b*c+27*sqr(a)*d)/(27*power(a,3));
delta:=power(q/2,2)+power(p/3,3);
if delta<0 then
 begin
  if q<0 then
   phi:=arctan(sqrt(-delta)/(-q/2));
  if q>0 then
   phi:=arctan(sqrt(-delta)/(-q/2))+pi;
  if q=0 then
   phi:=pi/2;
  y[1]:=2*sqrt(-p/3)*cos(phi/3);
  y[2]:=2*sqrt(-p/3)*cos(phi/3+(2*pi)/3);
  y[3]:=2*sqrt(-p/3)*cos(phi/3+(4*pi)/3);
  var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a),y[3]-b/(3*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
if delta>0 then
 begin
  var arsom:=range(0,1000).Where(x->(a*power(x,3)+b*x*x+c*x+d)/(x-e)=0);
  write(arsom.Count);
  {Мы не виноваты, Паскаль не может в комплексные числа}
 end;
if delta=0 then
 begin
  y[1]:=2*power(-q/2,1/3);
  y[2]:=-power(-q/2,1/3);
  var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
end;

procedure square(a,b,c,e:real);
Var
 d:real;
begin
d:=sqr(b)-4*a*c;
if d<0 then writeln('0');
if d>0 then
 begin
  var x:=arr((-b+sqrt(d))/(2*a),(-b-sqrt(d))/(2*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
if d=0 then
 begin
  var x:=arr(-b/(2*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
end;

procedure common(a,b,e:real);
begin
 var x:=arr(-b/a);
 write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;

procedure awfulvar(e:real);
begin
 if (e>=0) and (e<=1000) then writeln('1000') else writeln('1001');
end;

procedure otherawfulvar(e:real);
begin
 if e<>0 then writeln('1') else writeln('0');
end;

begin
read(a,b,c,d,e);
if (a<>0) and (b<>0) then cube(a,b,c,d,e);
if (a=0) and (b<>0) then square(b,c,d,e);
if (a=0) and (b=0) and (c<>0) and (d<>0) then common(c,d,e);
if (a=0) and (b=0) and (c=0) and (d=0) then awfulvar(e);
if (a=0) and (b=0) and (c<>0) and (d=0) then otherawfulvar(e);
if (a=0) and (b=0) and (c=0) and (d<>0) then writeln('0');
end.

Пример ввода:
1
1
1
1
1
Пример вывода:
0

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какие драйвера нужны после переустановки windows 7 на компьютер
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

uksusoval617
Yurevich-Vladimirovich
ivan-chay19
nastya3213868
Alisa1639
alenaya69918
dearmaria
Gennadevna_Baidalina131
Руслан Руденко1262
myglassi26
Melnik Kaveshnikova1746
mbykovskiy
tsigankova2018
kryukovaem
Galkin Vladimirovich729