М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
якек2
якек2
22.08.2022 02:46 •  Информатика

Вычислите десятичные эквалиенты следующих чисел: 1. 1110001 в 2 степени 2. 317 в 8 степени 3. 21е в 16 степени ​

👇
Открыть все ответы
Ответ:
валя20063
валя20063
22.08.2022

Написано на с++

//WlAY...

#include <iostream>

using namespace std;

int main()

{

   int N;

   cout << "Введите число учеников ->";

   cin >> N;

   if (N < 1)

   {

       cout << "ОШИБКА(учеников меньше 1)" << endl;

   }

   if (N > 30)

   {

       cout << "ОШИБКА(учеников  больше 30)" << endl;

   }

   else

   {

       int b[N];

       int i;

       int n1 = 0, n2 = 0, n3 = 0;

       for (i = 0; i <= N - 1; i++)

       {

           cout << "Введите кол-во правильно решённых примеров ученика номер" << i + 1 << "->";

           cin >> b[i];

           if (b[i] == 10)

               cout << "ОШИБКА(заданий всего 10)";

           if (b[i] == 10)

               n1 += 1;

           if (b[i] < 10 && b[i] >= 5)

               n2 += 1;

           if (b[i] < 5)

               n3 += 1;

       }

       cout << "---------------------ИТОГ-------------------------" << endl;

       cout << n1 << " ученик(а, ов) решил(и) все задания правильно (YES)" << endl;

       cout << n2 << " ученик(а, ов) получил(и) удовлетворительную оценку (NO)" << endl;

       cout << n3 << " ученик(а, ов) получил(и) неудовлетворительную оценку (NO)" << endl;

   }

}


Напишите программу для решения следующей задачи. На контрольной работе по алгебре ученикам 9 класса
4,6(34 оценок)
Ответ:
anuri1
anuri1
22.08.2022
var a, b, c, d, x1, x2, t: real;
begin 
    writeln('Программа для решения неравенства ax^2 + bx + c > 0'); 
    write('Введите коэффициенты a, b, c: '); 
    readln(a, b, c); 
    if a = 0 then begin
        if b = 0 then
        begin        
            if c > 0 then writeln('(-∞; +∞)')                   
                       else writeln('ø')       
        end       
        else if b > 0 then writeln('(', -c / b : 0 : 3, '; +∞)')             
                           else writeln('(-∞; ', -c / b, ')') 
    end 
    else 
    begin   
        d := b * b - 4 * a * c;   
        if d = 0 then
        begin     
            x1 := -b / (2 * a);     
            if a > 0 then writeln('(-∞; ', x1, ') U (', x1, '; +∞)')               
                       else writeln('ø')   
        end   
        else if d > 0 then   
        begin     
            x1 := (-b - sqrt(d)) / (2 * a);     
            x2 := (-b + sqrt(d)) / (2 * a);     
            if x1 > x2 then     
            begin       
                t := x1;       
                x1 := x2;       
                x2 := t     
            end;     
            if a > 0 then writeln('(-∞; ', x1, ') U (', x2, '; +∞)')               
                       else writeln('(', x1, '; ', x2, ')')   
        end   
        else   
        begin     
            if a > 0 then writeln('(-∞; +∞)')               
                       else writeln('ø')   
        end 
    end
end.
4,5(29 оценок)
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ