Учебно-методический комплекс по дисциплине «б в. 7»

Загрузка...





НазваниеУчебно-методический комплекс по дисциплине «б в. 7»
страница11/11
Дата публикации04.12.2014
Размер1.36 Mb.
ТипУчебно-методический комплекс
top-bal.ru > Информатика > Учебно-методический комплекс
1   2   3   4   5   6   7   8   9   10   11
Тема: Использование функции RANDOM для моделирования случайных процессов.
Пример 1.

Найти площадь заштрихованной фигуры методом Монте- Карло. Вычисление площади оформить как процедуру, в основной программе вводится число точек и выводится результат.



1) постановка задачи

Дано: фигура, ограниченная y=x2  и y=2

Надо: найти площадь фигуры.

2) математическая модель

Метод Монте-Карло позволяет находить приближенно площадь произвольной фигуры.



Для этого фигура помещается внутрь прямоугольника или квадрата, площадь которого известна и равна S. Прямоугольник (квадрат) случайным образом заполняется N точками. Если внутрь фигуры F попали М точек, то отношение M/N приближенно равно отношению площадей SF/S.

= , отсюда SF =S*M/N.

В данном примере фигура, площадь которой необходимо найти, ограничена линией y=x2 и помещена в прямоугольник ABCD. AB=1, AD=2.

Для решения задачи необходимо задать: N - общее число точек, S - площадь прямоугольника, содержащего фигуру, x,y - координаты точки, выбранные случайным образом внутри прямоугольника (-1
Чтобы подсчитать количество точек (x,y), принадлежащих фигуре (переменная  M), необходимо проверить условие y>x2.

3) блок-схема



4) программа

Program Pr2;

  Var

       S, SF: real;

       M,N: integer;

Procedure MonteKarlo(N: integer; S: real; Var SF:real);

    Var

          M, I: integer;

          X,Y: real;

     Begin

        M:=0;

        For i:=1 to n do

              Begin

                 X:=Random(20)/10-1;

                 Y:=Random(10)/10;

                 If   y
              End;

        SF:=S*M/N;

End;

^ BEGIN    {основная программа}

    randomize;

    Write('N='); Readln(n); S:=2;

     MonteKarlo(N, S, SF);

     writeln('SF=', SF:6:3);

END.

Результат выполнения программы: при N=100    SF=1.226

 

^ Задания для самостоятельной работы

    Выполните задания своего варианта и составьте письменный отчет. Отчет должен содержать:

программу;

проверку результатов ее выполнения.




Вариант 1
1. Методом Монте-Карло найти площадь фигуры:

2. Определить вероятность того, что из колоды 36 карт дважды подряд будет вытащен туз красной масти



Вариант 2

1. Методом Монте-Карло найти площадь фигуры:

2. Определить вероятность того, что за три броска игрального кубика дважды выпадет нечетное число.




Вариант 3

1. Методом Монте-Карло найти площадь фигуры:

2. В ящмке находится 5 белых и 10 черных шаров. Из него вынимется 3 шара. Определить вероятность того, что все шары черного цвета.
Вариант 4

1. Методом Монте-Карло найти площадь фигуры:
y


2. Определить вероятность того, что за 4 броска игрального кубика будет набрана сумма более 15.




Вариант 5

1. Методом Монте-Карло найти площадь фигуры
2. Определить вероятность того, что за 5 бросков игрального кубика четное число выпадет не более 3 раз.
Вариант 6

1. Найти площадь фигуры методом Монте-Карло.


2. Определить вероятность того, что из колоды 36 карт трижды подряд будет вытащена карта красной масти
Вариант 7

1. Найти площадь фигуры методом Монте-Карло.

2. Определить вероятность того, что за 4 броска игрального кубика будет набрано сумма не менее 10 и не более 20.
Вариант 8
1. Найти площадь фигуры методом Монте-Карло.

2. Определить вероятность того, что из колоды 36 карт дважды подряд будет вытащен король черной масти

Вариант 9

1. Найти площадь фигуры методом Монте-Карло.


2. Определить вероятность того, что при трех бросках игрального кубика каждый раз выпадет четное число.

Вариант 10

1. Найти площадь фигуры методом Монте-Карло.

2. Определить вероятность того, что при пяти бросках игрального кубика дважды выпадет тройка.

^ Лабораторная работа № 7

Тема: Рекурсивные алгоритмы.
Рекурсией называется ситуация, когда процедура или функция вызывает сама себя. Рекурсивный алгоритм обращается к самому себе, пока не выполнится определенное условие, поэтому в любой рекурсивной подпрограмме должна быть нерекурсивная ветвь (в примере 1 это: if N=1 then Fact:=1).
Пример 1.

Вычисление факториала натурального числа N.

N!=1*2*3*…*N
Вычисление факториала можно определить следующим образом:

N! =
Program Pr1;

Var

N: integer;

Function Fact(N:integer):real;

begin

if N=1 then Fact:=1 else Fact:=N*Fact(N-1);

end;

BEGIN {основная программа}

Write('N='); Readln(N);

Writeln(N, '!=', Fact(N):4:0);

Readln

END.
Пример 2.

Расчет суммы первых N натуральных чисел
Вычисление суммы 1+2+3+…+N можно определить следующим образом:

Sum(N) =
Program Pr2;

Var

N: integer;

Function Sum(N: integer): integer;

begin

if N=0 then Sum:=0 else Sum:= N+Sum(N-1);

end;
BEGIN {основная программа}

Write('N='); Readln(N);

Writeln('S=', Sum(N));

Readln

END.
Пример 3.

Вычисление n-го члена последовательности Фибоначчи.

Последовательность Фибоначчи определяется следующим образом: первые два числа равны 1, а каждое следующее равно сумме двух предыдущих (1, 1, 2, 3, 5,…).
Вычисление n-го члена последовательности Фибоначчи можно определить следующим образом:

Fib(n)=
Program Pr3;

Var

n:integer;

Function Fib(n:integer):integer;

begin

if n<=2 then Fib:=1 else Fib:=Fib(n-1)+Fib(n-2);

end;

BEGIN {основная программа}

Write('n='); Readln(n);

Write(Fib(n):5);

Readln

END.
Пример 4.

Расчет n-члена арифметической прогрессии, заданной значением первого члена a1 и разностью d.
Вычисление n-члена арифметической прогрессии можно определить следующим образом:

an =
Program Pr4;

Var

n:integer; d,a1:real;

Function Arifm(a1,d:real; n:integer):real;

begin

if n=1 then Arifm:=a1 else Arifm:=Arifm(a1,d,n-1) + d;

end;

BEGIN {основная программа}

Write('a1='); Readln(a1);

Write('d='); Readln(d);

Write('n='); Readln(n);

Write(Arifm(a1,d, n):5:2);

Readln

END.
Пример 5.

Нахождения суммы n членов арифметической прогрессии, заданной значениями первого члена прогрессии а и разности d.
Program Pr5;

Var

s,a,n,d: integer;

Function sa(n,a,d:integer):integer;

begin

if n>0 then sa:=a+ sa(n-1,a+d,d) else sa:=0;

end;

BEGIN {основная программа}

Write('n='); Readln(n);

Write('a='); Readln(a);

Write('d='); Readln(d);

Write(sa(n,a,d));

Readln

END.
Пример 6.

Возведение числа a в целую степень n.
Program Pr6;

Var a:real;

n:integer;

Function Stepen(a: real;n:integer):real;

begin

if n=0 then Stepen:=1

else if n>0 then Stepen:=a*Stepen(a,n-1)

else Stepen:=(1/a)*Stepen(a,n+1);

end;

BEGIN {основная программа}

Write('a='); Readln(a);

Write('n='); Readln(n);

Write(Stepen(a,n):6:4);

Readln

END.
Пример 7.

Представление натурального числа в двоичной системе счисления.
Program Pr7;

Var

n:integer;

Procedure Bin_n(n:integer);

begin

if n>1 then Bin_n(n div 2);

Write( n mod 2)

end;

BEGIN {основная программа}

Write('n='); Readln(n);

Bin_n(n);

Readln

END.
Пример 8.

Нахождения наибольшего общего делителя двух натуральных чисел
Program Pr8;

Var

a,b:integer;

Function Nod(a,b:integer):integer;

begin

if a=b then Nod:=a

else if a>b then Nod:=Nod(a-b, b)

else Nod:=Nod(a, b-a) ;

end;

BEGIN {основная программа}

Write('a='); Readln(a);

Write('b='); Readln(b);

Writeln('NOD(', a, ',', b, ')=', Nod(a,b));

Readln

END.

Задания для самостоятельной работы

  1. Вычислить (a! + b!)/a!, используя рекурсивную функцию вычисления факториала

  2. Вычислить m!/(m + n)!, используя рекурсивную функцию вычисления факториала

  3. Вычислить (1+2+3+4+5)/( 1+2+3+4+5+6+7+8), используя рекурсивную функцию вычисления суммы первых n натуральных чисел.

  4. Составить рекурсивную функцию для вычисления S = 2 + 4 + 6 +…+24

  5. Составить рекурсивную функцию для вычисления S = 5 + 10 + 15 +…+55

  6. Составить рекурсивную функцию для вычисления P = 2* 4* 6*…*12

  7. Составить рекурсивную функцию вычисления n-го члена арифметической прогрессии 3, 7, … и вывести первые 10 членов прогрессии .

  8. Составить рекурсивную функцию вычисления n-го члена геометрической 1, 2, … и вывести первые 8 членов прогрессии .

  9. Составить рекурсивную функцию вычисления n-го члена последовательности: а1= 1, ai = ai-1*i. Найти сумму 2-го и 5-го членов последовательности.

  10. Составить рекурсивную функцию вычисления n-го члена последовательности: а1= 0, ai = 2*ai-1+i. Найти произведение 3-го и 7-го членов последовательности.

  11. Составить рекурсивную функцию нахождения суммы n членов арифметической прогрессии 1, 3, …Найти сумму с 5-го по 10-й членов прогрессии

  12. Составить рекурсивную процедуру, которая печатает введенное натуральное число в восьмеричном представлении

  13. Найти наибольший общий делитель для чисел A, B, C, используя рекурсивную функцию нахождения наибольшего общего делителя двух натуральных чисел

  14. Сократить дробь a/b (a, b – введенные натуральные числа), используя рекурсивную функцию нахождения наибольшего общего делителя двух натуральных чисел

  15. Вычислить (42 + 23)/2-2 , используя рекурсивную функцию возведения в степень



Лабораторная работа № 8.

Тема: Поиск данных. Удаление и вставка элементов.




Пример 1.

   Сформировать массив a[1..10] случайным образом и определить, содержит ли он заданное число.

    Используемые  переменные: а - массив, i - номер очередного элемента массива,  k - ключ поиска

Program Pr1;

  Var

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

       k: real; i: integer;

BEGIN

     Randomize;

     for i:=1 to 10 do

          begin         {формирование массива}

                a[i]:=random(20); write(a[i]:4);

         end;

     writeln;   {перевод курсора на новую строку}

     write(' Введите ключ поиска: '); readln(k);

 

{перебор элементов массива и сравнение их с ключом поиска}

     i:=1; while (a[i]<>k) and (i<=10) do i:=i+1;

     if    i<=10   then    writeln('Элемент найден. Его номер - ',i)  else writeln('Элемент не найден');

END.

Пример 2.

    Сформировать упорядоченный по возрастанию массив a[1..10] и определить, содержит ли он введенное число (методом бинарного поиска).

    В программе использованы следующие обозначения: l - левая граница, r - правая граница, m - номер серединного элемента.

Program Pr2;

   Var

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

       k: real;    l, r, m, i: integer;

BEGIN

            {формирование и вывод массива}

     for i:=1 to 10 do

          begin

               a[i]:=2*i-1; write(a[i]:4);

     end;  

     writeln;

     write('Введите ключ поиска'); readln(k);

      l:=1; r:=10;    {установка начальных границ поиска}

      m:=(l+r) div 2;     {выбор серединного элемента}

                  {поиск заданного элемента}

      while (l<=r) and (k<>a[m]) do

             begin       

                   if     k
                   m:=(l+r) div 2;

            end;

     if   k=a[m]   then writeln('Элемент найден. Его номер - ',m)  else writeln('элемент не найден');

END.

Пример 3.

Сформировать массив a[1..n] случайным образом и удалить из него элемент c заданным индексом.

    Используемые переменные: а - массив, n - размерность массива,   m - индекс удаляемого элемента.

Program Pr3;

   Var 

       a: array[1..100] of integer;

       m, i, n: integer;

 

{процедура, удаляющая элемент с заданным индексом}

Procedure Udal(m: integer);

   Var

         j: integer;

   Begin

        if   m<>n   then    for j:=m to n-1 do a[j]:=a[j+1];

        n:=n-1;

   End;

BEGIN    {основная программа}

     n:=15;    randomize;

             {формирование и вывод элементов массива}

     for i:=1 to n do

           begin     

                a[i]:=random(50); write(a[i]:4);

           end;

    writeln;

    write('Введите номер удаляемого элемента '); readln(m);

    Udal(m);    {удаление элемента с индексом m }

    for i:=1 to n   do write(a[i]:4);    { просмотр элементов массива}

    writeln

END.
Пример 4.

Сформировать массив a[1..n] случайным образом и вставить на  m-ое место элемент k (m и k вводятся с клавиатуры).

Program Pr4;

   Var

        a: array[1..100] of integer;

        k, m, n, i: integer;

 

{процедура, вставляющая элемент k на m-ое место}

Procedure Vstavka(k, m:integer);

   Var

         j: integer;

Begin

       if    m<>n+1   then    for j:=n downto m do a[j+1]:=a[j];

       a[m]:=k; n:=n+1;

End;

BEGIN        {основная программа}

         write('Введите количество элементов массива’); readln(n);

         randomize;   

         {формирование и вывод массива}

         for i:=1 to n do

              begin

                    a[i]:=random(20)-10; write(a[i]:4);

              end;

         writeln;  write('Введите число и его номер'); readln(k,m);

         Vstavka(k,m);      {вставка элемента k на m-ое место}

          for i:=1 to n do write(a[i]:4); {просмотр массива}

          writeln; readln

END.
Пример 5.

Сформировать массив a[1..n], элементы которого выбираются случайным образом из интервала [0, 50]. Удалить из него те элементы, которые больше 40.

Program Pr5;

    Var

          a: array[1..100] of integer;

          m, i, n: integer;

{процедура, удаляющая элемент с указанным   индексом}

Procedure Udal(m: integer);

    Var

          j: integer;

Begin

         if    m
         n:=n-1;

End;

             

BEGIN    {основная программа}

      write(‘n=‘); readln(n); randomize;

                 {формирование и вывод массива}

      for i:=1 to n do

           begin

                a[i]:=random(50); write(a[i]:4);

           end;

      writeln;

              {перебор и удаление элементов массива, больших 40}

      i:=1;   while     i<=n    do   if a[i]>40    then   Udal(i)     else i:=i+1;

      for i:=1 to n do write(a[i]:4);      {просмотр массива}

      readln

END.

 

Задания для самостоятельной работы

    Выполните задания своего варианта и составьте письменный отчет. Отчет должен содержать программу и ручную проверку работы программы (рассмотреть конкретный массив).
Вариант 1

  1. Сформировать массив а[1..10], элементы которого выбираются случайным образом из интервала [10,90]. Определить методом последовательного поиска, содержит он заданное число. Если элемент найден, то удалить его из массива.

  2. Сформировать массив а[1..10], упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на первое место.




Вариант 2

  1. Сформировать массив а[1..8], элементы которого выбираются случайным образом из интервала [-10, 10]. Определить методом последовательного поиска, содержит он заданное число. Если элемент  не найден, то вставить его на первое место.

  2. Сформировать массив а[1..12],  упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент найден, то  удалить его из массива.




Вариант 3

  1. Сформировать массив а[1..20], элементы которого выбираются случайным образом из интервала [40, 90]. Определить методом последовательного поиска, содержит он заданное число. Если элемент найден, то удалить его и следующий за ним элемент из массива.

  2. Сформировать массив а[1..15], упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на третье место.




Вариант 4

  1. Сформировать массив а[1..18], элементы которого выбираются случайным образом из интервала [-20, 40]. Определить методом последовательного поиска, содержит он заданное число. Если элемент  не найден, то вставить его на последнее место.

  2. Сформировать массив а[1..12],  упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент найден, то  удалить его и следующий за ним элемент из массива.




Вариант 5

  1. Сформировать массив а[1..12], элементы которого выбираются случайным образом из интервала [101, 290]. Определить методом последовательного поиска, содержит он заданное число. Если элемент найден, то удалить его и стоящий  перед ним элемент  из массива.

  2. Сформировать массив а[1..10], упорядоченный по убыванию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на второе место.




Вариант 6

  1. Сформировать массив а[1..14], элементы которого выбираются случайным образом из интервала [-20, 50]. Определить методом последовательного поиска, содержит он заданное число. Если элемент  не найден, то вставить его на  последнее место.

  2. Сформировать массив а[1..20],   упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент найден, то   удалить его из массива.




Вариант 7

  1. Сформировать массив а[1..11], элементы которого выбираются случайным образом из интервала [-40, 70]. Определить методом последовательного поиска, содержит он заданное число. Если элемент найден, то удалить его и следующий за ним элемент из массива.

  2. Сформировать массив а[1..10], упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на первое место.  




Вариант 8

  1. Сформировать массив а[1..18], элементы которого выбираются случайным образом из интервала [20, 140]. Определить методом последовательного поиска, содержит он заданное число. Если элемент  не найден, то вставить его на последнее место.

  2. Сформировать массив а[1..12],  упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент найден, то  удалить его и следующий за ним элемент из массива.




Вариант 9

  1. Сформировать массив а[1..8], элементы которого выбираются случайным образом из интервала [10, 70]. Определить методом последовательного поиска, содержит он заданное число. Если элемент  не найден, то вставить его на второе место.

  2. Сформировать массив а[1..20],   упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент найден, то   удалить  следующий за ним элемент из массива.




Вариант 10

  1. Сформировать массив а[1..16], элементы которого выбираются случайным образом из интервала [100, 200]. Определить методом последовательного поиска, содержит он заданное число. Если элемент найден, то удалить  стоящий   перед ним элемент  из массива.

  2. Сформировать массив а[1..10], упорядоченный по убыванию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на второе место.



Лабораторная работа № 9.

Тема: Сортировка данных.
Пример 1. Метод «пузырьковой» сортировки

Составить в среде Turbo Pascal программу, которая позволит cформировать массив a[1..N], элементы которого выбираются случайным образом. Отсортировать его по невозрастанию.
Program Pr2;

Const N=15;

Var a: array[1..N] of integer;

i, j, t: integer; {i – номер просмотра, j – номер первого элемента

рассматриваемой пары, t –дополнительная переменная для

перестановки элементов массива}

BEGIN

Randomize;

Writeln('Исходный массив');

For i:=1 to N do begin

a[i]:=random(100);

write(a[i]:4);

end;

Writeln;

Writeln('Упорядоченный массив');

For i:=1 to N-1 do {цикл по номеру просмотра}

For j:=1 to N-i do

If a[j]{перестановка элементов}

begin

t:=a[j]; a[j]:=a[j+1]; a[j+1]:=t;

end;

For i:=1 to N do write(a[i]:3);

Readln

END.
Пример 2.

Составить в среде Turbo Pascal программу, которая позволит cформировать массив a[1..20], элементы которого выбираются случайным образом. Отсортировать по неубыванию элементы, занимающие нечетные позиции.

Program Pr3;

Var a[1..20] of integer;

i, j, t: integer;

BEGIN

for i:=1 to 20 do begin {формирование исходного массива}

a[i]:=random(100); write(a[i]:4);

end;

writeln;

for i:=1 to 19 do {сортировка}

for j:=i+1 to 20 do

if (a[i]>a[j]) and (i mod 2=1) and (j mod 2=1) then

begin t:=a[i]; a[i]:=a[j]; a[j]:=t; end;

for i:=1 to 20 do {вывод отсортированного массива}

write(a[i]:4);

END.

Пример 3.

В матрице NxN, элементы которой выбираются случайным образом, отсортировать по неубыванию элементы каждой строки.
Program Pr4;

Const N=5;

Type mas=array[1..N,1..N] of integer;

Var a: mas;

i, j, k, m, t: i nteger;

Begin

for i:=1 to N do begin {формирование и вывод на экран матрицы}

for j:=1 to N do begin

a[i,j]:=random(50); write(a[i,j]:3);

end;

writeln;

end;

writeln;

for i:=1 to N do {сортировка матрицы по строкам}

for k:=1 to N-1 do

for m:=k+1 to N do

if a[i,k]>a[i,m] then

begin t:=a[i,k]; a[i,k]:=a[i,m]; a[i,m]:=t; end;

for i:=1 to n do begin {вывод на экран отсортированной матрицы}

for j:=1 to N do write(a[i,j]:3);

writeln;

end;

END.
Пример 4.

Определить, какое максимальное число можно получить из цифр введенного натурального числа.

Для решения задачи достаточно отсортировать по невозрастанию цифры введенного числа (число вводится как строка цифр)
Program Pr5;

Var St: string;

i, j, n: integer; c:char;

Begin

write('Введите число '); readln(St);

n:= length(st); {количество цифр}

for i:=1 to n-1 do {сортировка}

for j:=i+1 to n do

if st[i]
writeln(st); {вывод отсортированной строки}

END.
Пример 5.

Составить в среде Turbo Pascal программу, которая позволит cформировать массив a[1..10], элементы которого выбираются случайным образом. Отсортировать его методом бинарных вставок.
В программе использованы следующие переменные:

n – размерность массива, l – левая граница упорядоченной последовательности, r – правая граница, m – номер серединного элемента, x – элемент, перемещаемый в упорядоченную последовательность.
Program Bin_Insert;

Const n=10;

Var a:array[1..n] of integer; i, j, l, r, m, x:integer;

BEGIN

Randomize; {инициируем датчик случайных чисел}

Writeln('Исходный массив');

For i:=1 to n do begin {формируем и выводим на экран массив}

a[i]:=random(100); write(a[i]:4);

end;

Writeln;

{сортировка}

For i:=2 to n do begin

l:=1; r:=i-1; {устанавливаем левую и правую границу}

x:=a[i]; {выбираем перемещаемый элемент}

While l<=r do{определяем для него место в упорядоченной последовательности}

begin

m:=(l+r) div 2;

If x
end;

{вставка элемента в упорядоченную последовательность}

For j:=i-1 downto l do a[j+1]:=a[j];

a[l]:=x;

end;

Writeln('Отсортированный массив');

For i:=1 to n do write(a[i]:4);

readln

END.
Задания для самостоятельной работы

  1. Задан массив В[1..20]. Отсортировать все элементы, стоящие на нечетных местах по невозрастанию.

  2. Задан массив B[1..30]. Отсортировать все элементы с n-го по k-ый по неубыванию.

  3. Задан массив a[1..20]. Отсортировать все элементы стоящие на четных местах по невозрастанию.

  4. Задан массив B[1..20]. Отсортировать элементы с 1-го по 10-ый по неубыванию, а с 11-го по 20-й - по невозрастанию.

  5. Задана матрица NxN. Отсортировать четные строки по невозрастанию.

  6. Задана матрица MxN. Отсортировать нечетные строки по неубыванию.

  7. Задана матрица NxN. Отсортировать все столбцы по невозрастанию.

  8. Задана матрица NxM. Отсортировать четные столбцы по неубыванию.

  9. Протабулировать функцию y=sin x2 на отрезке [1,3] с шагом h=0.1 и упорядочить значения функции по возрастанию.

  10. Протабулировать функцию y= cos x + sin x на отрезке [0, 1] с шагом h=0.05 и упорядочить значения функции по убыванию.

  11. Протабулировать функцию y= cos x2 + sin 2x на отрезке [0, 4] с шагом h=0.1 и упорядочить значения функции по убыванию.

  12. Задан массив X[1..20[, элементы которого выбираются случайным образом из отрезка [-30, 80]. Отсортировать все элементы с 5-го по 15-й по невозрастанию.

  13. Задан массив B[1..15], элементы которого выбираются случайным образом из отрезка [0, 70[. Отсортировать все элементы с n-го по k-ый по неубыванию.

  14. Задан массив a[1..20], элементы которого выбираются случайным образом из отрезка [-50, 50]. Отсортировать все элементы, стоящие на нечетных местах по невозрастанию.

  15. Задан массив B[1..20] , элементы которого выбираются случайным образом из отрезка [30, 100]. Отсортировать элементы с 1-го по 10-ый по невозрастанию, а с 11-го по 20-й - по. неубыванию


1   2   3   4   5   6   7   8   9   10   11

Похожие:

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс курс по выбору по дисциплине « дв4»
Учебно-методический комплекс по дисциплине " Технические и аудиовизуальные средства обучения"

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине « Б2»
Учебно-методический комплекс (далее умк) по дисциплине «Информатика» разработан в соответствии с требованиями фгос впо к обязательному...

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине Инженерная графика
Данный учебно-методический комплекс рассмотрен и утвержден на заседании Учебно-методической комиссии роат. Протокол №4 от 01. 07....

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине Инженерная графика
...

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине «Информатика»
Учебно-методический комплекс по дисциплине «Использование современных информационных и коммуникационных технологий» разработан в...

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине «Информатика»
Учебно-методический комплекс по дисциплине «Использование современных информационных и коммуникационных технологий» разработан в...

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине « дв12»
Учебно-методический комплекс по дисциплине " Технические и аудиовизуальные средства обучения"

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине « дв32»
Учебно-методический комплекс по дисциплине " Технические и аудиовизуальные средства обучения"

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине по выбору Б3
Учебно-методический комплекс по дисциплине «Логическое программирование» разработан в соответствии с требованиями фгос впо к обязательному...

Учебно-методический комплекс по дисциплине «б в. 7» iconУчебно-методический комплекс по дисциплине « В. 3»
Учебно-методический комплекс (далее умк) по дисциплине «Профессиональные компьютерные программы» разработан в соответствии с требованиями...



Школьные материалы
Загрузка...


При копировании материала укажите ссылку © 2018
контакты
top-bal.ru

Поиск