информатика 10 класс 1) Массив а[1..10] заполните случайными целыми числами в диапазоне от 1 до 10. Определите , есть ли в массиве элемент , равный 5. ответ выведите в виде слов "Да" или "Нет".
2) Составьте программу , которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 1 до 10 и выводит на экран последний элемент с нечётным значением и его индекс. ​

1) подход учитывающий не один, а несколько факторов - например  программировать работу светофора так, чтобы были учтены  а) "часы-пик"  б) погодные условия (туман/дождь/гололед) в) централизованные сигналы (проезд кортежа президента) г) сигналы пешеходов на переходе и т.д.;
2) системный эффект - это возникновение новых свойств, которых ранее не было у  элементов по отдельности. Кроме того,  это не очевидное (не сразу заметное) влияние различных факторов друг на друга и на конечный результат - например компьютер состоит из ряда простых электронных деталей, которые сами по себе ничего не представляют, но соединённые особым образом (в структуру) позволяют  хранить  числа и программы, складывать и вычислять и в конечном итоге - моделировать реальность (в играх, например). 
3) турникет в автобусе или метро (никто не знает как он работает, но все пользуются)

Uses crt;
var
    b, a: real;
    n: integer;

begin
    clrscr;
    repeat
        Write('Выберите фигуру (1-квадрат, 2-прямоугольник)');
        Readln(n);
        
        case n of
            1:
                begin
                    write('Сторона квадрата=');
                    readln(a);
                    Write('S=', a * a);
                end;
            2:
                begin
                    write('Стороны прямоугольника=');
                    readln(b, a);
                    Write('S=', b * a);
                end;
        else exit;
        end;
    until false;
end.