<span>//PascalABC.NET
//Версия 3.3, сборка 1611 (06.01.2018)
</span>
begin
var (a,b):=ReadInteger2('Введите a,b,c,d->');
var (c,d):=ReadInteger2;
Write('Корни: ');
for var x:=0 to 1000 do
if a*x**3+b*x**2+c*x+d=0 then Write(x,' ');
end.
Пример:
Введите a,b,c,d-> 1 -3 -13 15
Корни: 1 5
1) "Забудьте" оба наушника на телефоне, т.к. сотрите из подключенных ранее устройств.
2) Выключите оба наушника
3) Включите ПРАВЫЙ наушник
4) Подключите его к телефону, чтобы он его запомнил
5) Включите левый наушник. Если он всё ещё не синхронизируется с правым, то снова отключите пару.
6) Теперь попробуйте включить оба наушника. Правый, по старой памяти свяжется со смартфоном, а левый с правым.
#include <iostream>
using namespace std;
const int N = 8; //длина массива
double s = 0; //начальное значение суммы
double mas[N]; //объявляем статический массив длины N
int main()
{
//вводим элементы массива
for(int i = 0; i < N; ++i)
{
cin >> mas[i];
}
//пробегаемся по элементам массива
for(int i = 0; i < N; ++i)
{
if(mas[i] != 0.0) //если элемент массива не равен 0
s += 1. / mas[i]; //прибавляем значение обратного элемента к итоговой сумме
}
cout << s; //вывод суммы на экран
return 0;
<span>}</span>
Решение показано в прилагаемом файле.
Ответ: 10 путей.