В таблице приведены запросы и количество найденных по ним страниц некоторого сегмента сети интернета Запрос Кол-во страниц в (тыс)

крейсер & линкор 7000

крейсер 4800

линкор 4500

Сколько страниц в тыс будет найдено по запросу крейсер & линкор

В первую очередь - нельзя поддаваться панике! Специалисты советуют, в случае, если паники избежать не удалось, сесть на пол, спиной опереться о стену — чем больше точек опоры почувствует тело, тем быстрее человек успокоится. Ни в коем случае не пытайтесь выбраться из лифта самостоятельно - ЭТО ОПАСНО! Нажмите кнопку связи с диспетчером и попросите о Назовите диспетчеру адрес и подъезд дома, где вы находитесь, и расскажите об обстоятельствах поломки. Дождитесь лифтёров и выходите из лифта только после их разрешения или с их если лифт застрял между этажами. Если у вас при себе есть мобильный телефон, свяжитесь со службой ремонта (номера телефонов обычно указываются на стене кабины лифта). Если телефона под рукой нет - кричите и зовите на Тёплую одежду лучше расстегнуть или снять. Чувствуете психологический дискомфорт — позвоните по мобильному другу, родственнику, иногда голоса близкого человека достаточно, чтобы успокоиться. Курить в застрявшем лифте - НЕЛЬЗЯ: поскольку неизвестно, сколько придётся провести времени в ожидании. Если есть вода — не стоит выпивать её сразу. Ну а если угораздило застрять вместе с младшим братом или сестрой, спокойствие просто необходимо. Нужно постараться превратить создавшуюся ситуацию в игру, иначе, в последствии, боязнь лифта может перейти у ребенка в фобию. Предложите ему покричать: «Ой, мы застряли Мы барабашки!» И весело, и полезно – вдруг вас услышит кто-то из соседей.

//PascalABC.NET 3.1 сборка 1200
var
    a, b, c, d, x: real;
    x2: array[1..2]of real;
    i: integer;

begin
    readln(a, b, c);
    d := b * b - 4 * a * c;
    if d < 0 then begin
        writeln('Сложные комплексные корни');
        halt;
    end;
    
    d := sqrt(d);
    x2[1] := (-b + d) / 2 / a;
    x2[2] := (-b - d) / 2 / a;
    
    for i := 1 to 2 do
    begin
        x := sqrt(abs(x2[i]));
        if x2[i] >= 0 then
            writeln('x[', 2 * i - 1, '] = ', x, ' x[', 2 * i, '] = ', -x)
        else
            writeln('x[', 2 * i - 1, '] = ', x, 'i x[', 2 * i, '] = ', -x, 'i');
    end;
end.