8) Отделить корни аналитически и уточнить их до 0,001 методами дихотомии и хорд: a) 2,2x-2^x=0 ; b) 2^x-2x^2-1=0 ; c)2^x-4x=0

Program sum_nechet;
var a: array [0..100] of integer;
var b,i,c,k:integer;
begin
    randomize;
    for i:=1 to 10 do
    begin
        a[i]:=random(10);
        writeln(a[i]); // Это можно не писать, просто чтобы видеть числа в массиве, если интересно.
    end;
    c := 0;
    b := 0;
    for i:=1 to 10 do
    begin
        if a[i] mod 2 = 0 then
        b := b + a[i]
        else
        c := c+ a[i];
    end;
    writeln('Нечетных ' , c);
    writeln('Четных ' , b);
    k:=0;
    for i:=1 to 10 do
    begin
        if a[i] = 0 then
        k:= k+1
    end;
    writeln('Нулей ' , k)
end.
       

Объяснение:

(Время прилета)-(время вылета)+(часовой пояс Новосибирска 3)-(часовой пояс относительно Москвы)

Если время прилета меньше времени вылета то +24 часа (это значит прилет происходит в следующие сутки после вылета)

Например рейс в Астану. Вылет 13:40, Прилет 14:35, пояс относительно Москвы =2

14:35-13:40+3-2=0:55+3-2=1:55

или рейс в Иркутск Вылет 21:30, Прилет 1:30, пояс относительно Москвы =5

1:30+24:00-21:30+3-5=25:30-21:30+3-5=4:00+3-5=2:00

Надо понимать что это время (2:00) это именно продолжительность рейса. То есть взлет в 21:30 и через 2:00 посадка в Иркутске. В Новосибирске в это время будет 23:30, но в самом Иркутске будет 1:30