Для ответа на Ваш вопрос надо решить квадратное уравнение.
-2x² - 8x + 15 = 5
-2x² - 8x + 10 = 0
x² + 4x - 5 = 0
По Виета
x₁= -5
x₂ = 1
var b,i,z,k: integer;
a: array[1..10000] of integer;
begin
read(b);
z: =0;
k: =0;
while b> 0 do
begin
z: =z+1;
a[z]: = b mod 10;
b: =b div 10;
end;
for i: =2 to z-1 do
if a[i]=a[i-1] or a[i]=a[i+1] then
k: =1;
if k=1 then writeln (‘да’)
else writeln (‘нет’);
end.
второй способ:
var a,b,c: integer;
begin
read(a);
k: =0;
c: =10; // это должно быть обязательно число, но не цифра
while a > 0 do
begin
b: =a mod 10;
a: =a div 10;
if b=c then k: =1;
c: =b;
end;
if k=1 then writeln (‘да’)
else (‘нет’);
end.
Диаметр Солнца = 1.39 млн км
1 астрономическая единица (а. е.) = 149.6 млн км, и с этого расстояния угловой размер солнца составляет 1.39/149.6 = 0.0093 рад = 0.532 градуса = 31' 57'' (это угловые минуты и секунды)
Орбита Плутона имеет значительный эксцентриситет, поэтому нужно сделать расчет для ближайшей точки (перигелий = 29.7 а. е.) и самой удалённой точки (афелий = 49.3 а. е.). Фактически нужно лишь поделить вышеприведённый угловой размер 0.532 градуса на эти два числа, и мы получим угловой размер Солнца с Плутона от 0.647 до 1.07 угловой минуты (меняется чуть ли не в два раза каждые 45 лет), то есть в среднем 0.86 угл минуты = 51 угл. сек.
x = -5; x = 1
Пошаговое объяснение:
-2x² - 8x + 15 = 5
-2x² - 8x + 10 = 0
x² + 4x - 5 = 0
(x + 5)(x - 1) = 0
x1 = -5
x2 = 1