Pascal 35 вопросы
2. почему массив является структурированным типом данных?
6. какими может быть заполнен массив? примеры.
7. как определить минимальный объём памяти, отводимой под массив?
8. может ли массив быть элементом массива?
9. можно ли выполнять обход двумерного массива, организовав внешний цикл по столбцам, а внутренний — по строкам?
10. целесообразно ли использовать ли вложенные циклы, если совершается обход

1) пассажир Иванов живёт в Москве; 2) проводник живёт на полпути между Москвой и Санкт-Петербургом; 3) пассажир-однофамилец проводника живёт в Санкт-Петербурге; 4) у пассажира, который живёт ближе к месту жительства проводника, чем другие пассажиры, вдвое больше детей, чем у проводника; 5) у пассажира Петрова трое детей; 6) Сидоров (из поездной бригады) недавно выиграл у машиниста партию на бильярде
7) п1+п3 = проводник не Иванов. Кто-то из пассажиров живет в С-Петербурге8) п4+п5+п7 = У Петрова нечетное кол-во детей, значит он не тот кто живет рядом с проводником. Петров живет в С-Петербурге9) п3+п8 =  У проводника фамилия Петров10) п6+п9 = машинист не Сидоров. Машинист - Иванов
ответ: Иванов 

 uses crt;
 var
    x,y: real;begin 
clrscr;
    write ('x = '); read (x);
    write ('y = '); readln (y);    if (x > 0) and (y > 0) then
        writeln ('Номер четверти координатной плоскости:I')
    else
        if (x < 0) and (y > 0) then
            writeln ('Номер четверти координатной плоскости:II')
        else
            if (x < 0) and (y < 0) then
                writeln ('Номер четверти координатной плоскости:III')
            else
                if (x > 0) and (y < 0) then
                    writeln ('Номер четверти координатной плоскости:IV')
                else
                if (x>0)or(x<0) and (y=0) then    writeln ('-. Точка лежит на оси. X')
                                   else
                if (y>0)or(y<0) and (x=0) then    writeln ('-. Точка лежит на оси. Y')
                                   else writeln ('-. Точка лежит в центре.');readln
end.