Реферат: Общие сведения о языке программирования Qbasic

NEXT I

PRINT ²минимум²; MIN

Пример 3. Даны 2 массива А(9), В(9). Получить массив, каждый элемент которого равен сумме соответствующих элементов данных массивов

DIM A(9), B(9), C(9)

FOR I=0 TO 9

C(I)=A(I)+B(I): PRINT C(I)

NEXT I

СОРТИРОВКА МАССИВА ПО ВОЗРАСТАНИЮ

1 СПОСОБ (метод пузырька) 2 СПОСОБ (метод сортировки DIM A(9)простым способом).

CLSDIM A(9)

FOR i = 0 TO 9 PRINT “Введите 10 элементов”

INPUT A (i) FOR i=0 TO 9

NEXT i INPUT A(i)

FOR i = 0 TO 9 NEXT i

FOR y = 9 TO i STEP - 1 FOR i=0 TO 9

IF A (y) >A(y-1) THEN GOTO 20 P=A(i) : K=i

m = A (y) FOR y=i+1 TO 9

A (y) = A (y-1) : A (y-1) = m IF A(y)>P THEN GOTO 50

20 NEXT y P=A(y):K=y

NEXT i 50 NEXT y

FOR i=0 TO 9 A(K)=A(i):A(i)=P

PRINT А(i) NEXT i

NEXT i PRINT “Отсортированные элементы”

FOR i=0 TO 9

PRINT A(i)

NEXT i

END

3 способ (метод простого включения)

DIM A (10), В(9)

К-во Просмотров: 724
Бесплатно скачать Реферат: Общие сведения о языке программирования Qbasic