На числовой прямой даны три отрезка: p= (5,15], q = (10,20) и r=(15,20]. выберите такой интервал а,
что формулы
(х - а) — (х є р) и (x & q) — (x & r)
тождественно равны, то есть принимают равные значения при любом значении переменнойх (за
исключением, возможно, конечного числа точек).
1) [3, 10] 2) [7, 12] 3) (12, 17 , 4)[22, 25)

program gh;

    var a: array[ 1..10] of integer;

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.

program xxx;

var a,s : string;

    i: integer;

begin

    writeln ('введите слово и символ-');

    readln (s,a);

    for i: =1 to length(a) do

        if copy (s,i,1)=a then writeln (i);

    readln

end.

по центру каждой стены  по  стулу  а также в каждый угол по стулу

пусть х(мин)-потратела времени на выполнение д/з вчера

имеем уравнение:

х+х-10=60

2х=60+10

2х=70

х=70/2

х=35

35(мин)-потратела времени на выполнение д/з вчера