1. ИНФОРМАЦИЯ И ЕЕ РОЛЬ В СОВРЕМЕННОМ ОБЩЕСТВЕ. 2. КРАТКАЯ ИСТОРИЯ РАЗВИТИЯ ВычислиТЕЛЬНОЙ ТЕХНИКИ.
3. ОСНОВНЫЕ ФУНКЦИОНАЛЬНЫЕ ЧАСТИ ЭВМ
4. УСТРОЙСТВА ХРАНЕНИЯ ИНФОРМАЦИИ
5. УПОРЯДОЧИВАНИЕ ИНФОРМАЦИИ НА ДИСКЕ.​

#include "pch.h"

#include

#include

using namespace std;

double f(double x)

{

double m = -7 * pow(x, 3) - 5.8*x - 4;

return m;

}

int main()

{

double a = -1; double b = 2;

flag1:

double c = 0.5*(a + b);

if (f(c) == 0)

cout << "The result is " << c << endl;

if (f(c)*f(a) < 0)

{

b = c;

goto flag1;

}

if (f(c)*f(b) < 0)

{

a = c;

goto flag1;

}

if (c >= a && c <= b)

cout << "The solution belongs to the interval" << endl;

else

cout << "The solution doesn't belongs to the interval";

return 0;

}

Тут с флагами. Если не нравятся флаги - перестройте под себя.

var

a,b,c,ostatok:integer;

cr:real;

begin

a:=5;

b:=3;

//Если использовать не целочисленного деление,

//то будет 1.666666666...

cr:=a / b;

 writeln ('При нецелочисленном делении c=',cr);

//Если использовать целочисленного деление,

//то будет 1

c:=a div b;

writeln ('При целочисленном делении c=',c);

//Проверим остаток при целочисленном делении арифметический

ostatok := a-c*b;

writeln ('При делении ',a,' на ',b,' остаток = ',ostatok);

//Проверим остаток при целочисленном делении с операции mod

ostatok := a mod b;

writeln ('При делении ',a,' на ',b,' остаток = ',ostatok);

end.

Объяснение: