Блок 16 - Задание условия. После выполнения которого, происходит переход к следующему значению параметра J из цикла. После завершения цикла J происходит переход к следующему значению I.
Блоки 13, 14, 15 и 16 предназначены для распределения значений вектора В в порядке возрастания (метод всплывающих пузырьков).
Блок 17 - Начало цикла I, с помощью которого выведем все значения В на печать.
Блок 18 - Вывод значений вектора В по возрастанию на печать.
Блок 19 - Блок передачи управлений по условию для нахождения суммы логарифмов квадратов элементов вектора В.
Блок 20 - Вычисление S(суммы), после происходит возврат к началу цикла, где меняется значение параметра I и так до конца завершения цикла.
Блок 21 - Вывод значение S на печать (распечатка).
Блок 22 - Конец программы.
3. Распечатка программы
10 REMDZIK
20 DIM A(9), B(10)
30 S=O:X=O
40 FOR I=1 TO 9
50 PRINT " A(";I;")",
60 INPUT A(I)
70 B(I)=A(I)
80 NEXT I
90 INPUT "R="; R
100 LPRINT USING "R=##.##"; R
110 FOR I=1 TO 9
120 LPRINT USING "A(I)=##.##"; A(I)
130 NEXT I
140 B(10)=R
150 FOR I=2 TO 10
160 FOR J=10 TO I STEP -1
170 IF B(J-1)>B(J) THEN X=B(J): B(J)=B(J-1): B(J-1)=X
180 NEXT J
160 NEXT I
200 FOR I=1 TO 10
210 LPRINT USING "B(I)=##.##"; B(I)
220 IF I MOD 2=0 THEN S=S+LOG(B(I)^2)
230 NEXT I
240 LPRINT USING "S=##.##"; S
250 END_
4. Распечатка исходных данных
R= 2.30
A(I)= 9.60
A(I)= 7.40
A(I)= 4.10
A(I)= 4.00
A(I)= 3.80
A(I)= 2.50
A(I)= 2.40
A(I)= 2.20
A(I)= 1.70
5. Распечатка результатов расчета
B(I)= 1.70
B(I)= 2.20
B(I)= 2.30
B(I)= 2.40
B(I)= 2.50
B(I)= 3.80
B(I)= 4.00
B(I)= 4.10
B(I)= 7.40
B(I)= 9.60
S=24.68
Заключение
В курсовой работе из данных значений вектора А=( 9,6 7,4 4,1 4,0 3,8 2,5 2,4 2,2 1,7), введенных с клавиатуры и переменной R=2,3, рассчитаны значения вектора В=(9,6 7,4 4,1 4,0 3,8 2,5 2,4 2,2 1,7 2,3), методом «Всплывающих пузырьков» полученные значения вектора В были расположены в порядке возрастания В=(1,7 2,2 2,3 2,4 2,5 3,8 4,0 4,1 7,4 9,6). Вычислена сумма логарифмов квадратов четных элементов вектора В. (S=24,68).
Для составление программы в курсовой работе использовались операторы:
REM - служит для записи комментариев и не влияют на выполнение программы.
DIM- Объявляет массивы с указанием размеров.
INPUT - подсказывает пользователю, что нужно ввести значение одной или нескольких переменных. Оператор INPUT ждет, пока пользователь не введет данные с клавиатуры, и затем присваивает значения заданным переменным.
PRINT - служит для вывода данных на экран.
LPRINTUSING - вывод данных на принтер.
FOR-NEXT - для организации цикла. Выполнение операторов между FOR и NEXT повторяется и с каждым прохождением через цикл значение переменной увеличивается на величину шага. Если шаг опускается, пошаговое приращение по умолчанию становится равным 1. Цикл завершается, когда переменная счетчика будет больше или равна той, что указана в операторе.
IF-THEN - проверяет условия и меняет ход выполнения программы в соответствии с заданными условиям. Если выражение следующее за IF верно, т.е. соблюдены заданные условия, то выполняется оператор(ы), следующий за THEN. Если выражение не верно, то все что стоит за THEN опускается, и программа продолжается выполнением следующей строки программы.
END - Завершает выполнение программы.
Литература
1. «Методические указания и контрольные задания» по дисциплине «Информатика», - Мн. 2001.
2. В.Э. Фигурнов, "IBM PC для пользователя", издание 7, Москва, ИНФРА-М, 1997.
3. «ОСНОВЫ ПРИКЛАДНОЙ ИНФОРМАТИКИ» Раздел: Описание языка Турбо-Бейсик. Справочное пособие для студентов всех специальностей, - Москва, 1994.