|
Реферат: Программа, которая упорядочивает элементы чётных строк матрицы по возрастанию, а нечётных – по убыванию (Компьютеры)
2.24. Составить программу, которая упорядочивает элементы чётных строк матрицы по возрастанию, а нечётных – по убыванию. 17. Задан массив {Ai}: 2; 0,4; 3,14; -1,57; 11; 7,34; -2,6; 0; 5; -1. Вычислить массив {Yi}, каждый элемент которого вычисляется по формуле cos(A), и подсчитать количество элементов L из массива {Yi}, попадающих в интервал [0;1]. Вывести на печать L и массивы {Ai} и {Yi}.
Программа №2.24:
cls 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,2) and a(1,1)>a(1,3) then b(1,1)=a(1,1) else if a(1,1)a(1,3) then b(1,1)=a(1,2) else if a(1,2)a(1,1) then b(1,1)=a(1,3) else if a(1,3)a(3,3) then b(3,1)=a(3,1) else if a(3,1)a(3,3) then b(3,1)=a(3,2) else if a(3,2)a(3,1) then b(3,1)=a(3,3) else if a(3,3)a(2,3) then b(2,3)=a(2,1) else if a(2,1)a(2,3) then b(2,3)=a(2,2) else if a(2,2)a(2,1) then b(2,3)=a(2,3) else if a(2,3)a(4,3) then b(4,3)=a(4,1) else if a(4,1)a(4,3) then b(4,3)=a(4,2) else if a(4,2)a(4,1) then b(4,3)=a(4,3) else if a(4,3) .CODE – открывает сегмент кода .DATA -- открывает сегмент данных .STACK N – определяет сегмент stack(а); дерективы закрытия сегментов в этом случае не используются; N – показывает размер stack(a) в байтах Примечание: при использовании таких деректив регистр ds инициализируется следующим образом: mov ax,@data mov ds,ax assume в этом случае не используется
----------------------- [pic]
[pic]
[pic]
[pic]
[pic]
[pic]
D=D+1
D(2
D=0
C=C+1
F=AH(AL
AL=AL
AL=A+C
A=0;B=0; C=0;D=0;F=0
AH=B(D
начало
Вывод на экран
A,B,C,D,F
выход
A(2
B=0
A=A+1
B(2
C=0 B=B+1
C(2
[pic]
[pic]
| |