-Если логическое выражение истинно, то используя стандартные функции найдитe значения корня квадратного и модуля. -Выведите эти значения на экран. -В другом случае выведите на экран сообщение «Введены недопустимые значения переменных».

Значения переменных:
1. х=23, y=5;
2. X=-5, y=15;B
3. х=8, y=8.
2) Напишите программу вывода на экран большего из двух чисел. 3)Напишите программу, которая, если введённое число отрицательное, меняет его на противоположное.

Var
    n, k, i, imax, j: integer;
    a: array[1..100]of integer;

begin
    randomize;
    n := random(30) + 10;
    for i := 1 to n do
    begin
        a[i] := Random(30);
        write(a[i], ' ');
    end;
    writeln();
   
    {сортировочка}
    for i := 1 to n - 1 do
    begin
        imax := i;
        for j := i + 1 to n do
            if a[j] > a[imax] then
                imax := j;
        k := a[i];
        a[i] := a[imax];
        a[imax] := k;
    end;
   
    for i := 1 to n do
        write(a[i], ' ');
   
    k := 0;
    for i := 2 to n - 1 do
        if (a[i] <> a[i - 1]) and (a[i] <> a[i + 1]) then
            k := k + 1;
   
    if a[1] <> a[2] then k := k + 1;
    if a[n] <> a[n - 1] then k := k + 1;
   
    writeln();
    writeln('No doubles - ', k);
end.

Персональные компьютеры PC сегодня стали незаменимыми человека во всех без исключения сферах человеческой деятельности. На компьютерах рассчитывают заработную плату и объем урожая, рисуют графики движения товаров и изменения общественного мнения, проектируют атомные реакторы и ботинки.

Слово “компьютер” означает “вычислитель”. Потребность в автоматизации обработки данных, в том числе вычислений, возникла очень давно. В настоящее время индустрия производства компьютерного железа и программного обеспечения является одной из наиболее важных сфер экономики развитых и развивающихся стран. Причины стремительного роста индустрии персональных компьютеров: 
невысокая стоимость; 
сравнительная выгодность для многих деловых применений; 
простота использования; 
возможность индивидуального взаимодействия с компьютеров без посредников и ограничений; 
высокие возможности по переработке, хранению и выдаче информации; 
высокая надежность, простота ремонта и эксплуатации; 
компьютерное железо адаптивно к особенностям применения компьютеров; 
наличие программного обеспечения, охватывающего практически все сферы человеческой деятельности, а также мощных систем для разработки нового программного обеспечения.