Регистрация Спросить otvet5GPT
ааааааа59
29.12.2021 04:22
Информатика
Есть ответ 👍

Программное обеспечение – это…
набор всех установленных на компьютере программ. (операционная система, служебные программы и прикладные программы)
система текстовых, графических, музыкальных, видеофайлов и так далее (прикладные программы)
совокупность всех устройств компьютера. Базовая комплектация содержит следующие функциональные блоки: системный блок, монитор, клавиатура, мышь.

154
473
Посмотреть ответы 2

Ответы на вопрос:

2003kate2003kate2003
2003kate2003kate2003
4,4(6 оценок)
Набор всех установленных на компьютере программ
Aznabaev09
Aznabaev09
4,6(85 оценок)
//когда глеб расстроился //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: =+sqrt(d))/(2*-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

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS