Программа, которая упорядочивает элементы чётных строк матрицы по возрастанию, а нечётных – по убыванию

    Дисциплина: Программирование
    Тип работы: Реферат
    Тема: Программа, которая упорядочивает элементы чётных строк матрицы по возрастанию, а нечётных – по убыванию

    2.24. Составить программу, которая упорядочивает элементы чётных строк матрицы по возрастанию, а нечётных – по убыванию.

    17. Задан массив {

    }: 2; 0,4; 3,14; -1,57; 11; 7,34; -2,6; 0; 5; -1. Вычислить массив {

    }, каждый элемент которого вычисляется по формуле

    ), и подсчитать количество элементов

    из массива {

    }, попадающих в интервал [0;1]. Вывести на печать

    и массивы

    {Ai}

    {Yi}.

    Программа №2.24:

    print \"

    Введём

    массив A(4,3):\"

    print \" \"

    dim a(4,3)

    for x=1 to 4

    for y=1 to 3

    print \"A(\";

    x;\",\";y;\") = \";

    input a(

    x,y)

    next y

    next x

    dim b(4,3)

    if a(1,1)a(1,3) then b(1,3)=a(1,1) else b(1,2)=a(1,1)

    if a(1,2)a(1,3) then b(1,3)=a(1,2) else b(1,2)=a(1,2)

    if a(1,3)a(1,3) then b(1,3)=a(1,3) else b(1,2)=a(1,3)

    if a(3,1)a(3,3) then b(3,3)=a(3,1) else b(3,2)=a(3,1)

    if a(3,2)a(3,3) then b(3,3)=a(3,2) else b(3,2)=a(3,2)

    if a(3,3)a(3,3) then b(3,3)=a(3,3) else b(3,2)=a(3,3)

    if a(2,1)a(2,3) then b(2,1)=a(2,1) else b(2,2)=a(2,1)

    if a(2,2)a(2,3) then b(2,1)=a(2,2) else b(2,2)=a(2,2)

    if a(2,3)a(2,3) then b(2,1)=a(2,3) else b(2,2)=a(2,3)

    if a(4,1)a(4,3) then b(4,1)=a(4,1) else b(4,2)=a(4,1)

    if a(4,2)a(4,3) then b(4,1)=a(4,2) else b(4,2)=a(4,2)

    if a(4,3)a(4,3) then b(4,1)=a(4,3) else b(4,2)=a(4,3)

    print

    \"Отсортированная по элементам матрица:\"

    print \"

    for x=1 to 4

    for y=1 to 3

    print b(

    x,y);

    next y

    print \" \"

    next x

    Программа №17

    dim y(10)

    dim a(10)

    a(1)=2

    a(2)=0.4

    a(3)=3.13

    a(4)=-1.57

    a(5)=11

    a(6)=7.34

    a(7)=-2.6

    a(8)=0

    a(9)=5

    a(10)=-1

    for x=1 to 10

    y(x)=

    cos(a(x))

    if y(x)1 then L=L+1

    next

    print

    Исходный массив:

    Конечный

    массив

    print \" \"

    for x=1 to 10

    print \"

    locate (x+2),29

    print \"!

    y(x)

    next x

    print \"____________________________________________________\"

    print \" \"

    print \"L =\";L

    Язык: Русский

    Скачиваний: 126

    Формат: Basic, Microsoft Word

    Размер файла: 4 Кб

    Автор:

    Скачать работу...

    Забрать файл

    Похожие материалы:


ПИШЕМ УНИКАЛЬНЫЕ РАБОТЫ
Заказывайте напрямую у исполнителя!


© 2006-2016 Все права защищены