Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) icon

Лабораторная работа №9 по курсу "Информатика" (язык программирования basic )



НазваниеЛабораторная работа №9 по курсу "Информатика" (язык программирования basic )
Галчёнков С.А
Дата конвертации17.09.2012
Размер48.36 Kb.
ТипЛабораторная работа
1. /BASIC Lab1.doc
2. /BASIC Lab2.doc
3. /BASIC Lab3a+b.doc
4. /BASIC Lab4.doc
5. /BASIC Lab5.doc
6. /BASIC Lab6.doc
7. /BASIC Lab7.doc
8. /BASIC Lab8.doc
9. /BASIC Lab9a+b.doc
Программирование алгоритмов линейной структуры
Лабораторная работа №2 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №3 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №4 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №5 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №6 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №7 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №8 по курсу "Информатика" (язык программирования basic )
Лабораторная работа №9 по курсу "Информатика" (язык программирования basic )


Министерство Образования Украины

Национальный технический университет Украины ”КПИ”

Кафедра Звукотехники и регистрации информации


ЛАБОРАТОРНАЯ РАБОТА №9


по курсу “Информатика”

(язык программирования BASIC)



Выполнил

ст. 1-го курса ФЭЛ

гр. ДЗ – 92

Галчёнков С.А.

Проверил


проф. Корниенко Г.И.

асс. Гумен Т.Ф.




Киев


  • Тема

ПРОГРАММИРОВАНИЕ С ИСПОЛЬЗОВАНИЕМ ПОДПРОГРАММ ПОЛЬЗОВАТЕЛЯ      


  • Цель работы

овладение навыками алгоритмизации и программирования задач с использованием подпрограмм пользователя различных видов, овладение навыками написания подпрограмм и обращения к ним, выбора параметров подпрограмм


  • Задание к работе[2]

А) вычислить среднее арифметическое положительных элементов массивов А(N1), B(N2), C(N3), где

N1≤100

N2≤100

N3≤100


Б) найти наименьшие элементы, номера строк и столбцов, в которых они расположены, матриц:

A(10,15), B(15,12)


  • Теоретические сведения

Часто в разных местах программы выполняется одна и та же группа операторов при разных значениях переменных. В этом случае уместно выделить эту группу операторов с основной программы в виде подпрограммы, и, при необходимости, передавать ей управление с основной программы.

Обращение к подпрограмме осуществляется оператором вызова подпрограммы GOSUB. Оператор GOSUB обеспечивает переход к выполнению подпрограммы, которая начинается со строки m.

Формат оператора:

GOSUB m

Подпрограмма представляет собой последовательность операторов, которые завершаются оператором возврата RETURN. Этот оператор осуществляет выход из подпрограммы после её выполнения к оператору, который стоит после GOSUB.

Формат оператора:

m <последовательность операторов>

……………………………………….

n RETURN


Передача значений параметров в подпрограмму и запоминание результатов её работы происходит в основной программе с использованием операторов присваивания.


  • Блок-схема алгоритма[1]А









  • Блок-схема алгоритма[1]Б







  • Листинг программы


А


10 REM LAB9a GSA

20 CLS : PRINT "МАССИВЫ A(N1),B(N2),C(N3)"

30 INPUT "N1,N2,N3?:", N1, N2, N3

40 IF N1 > 100 OR N2 > 100 OR N3 > 100 THEN 20

50 DIM A(N1), B(N2), C(N3)

60 N = N1: GOSUB 100: PRINT "ai="; S / L: PRINT

70 N = N2: GOSUB 100: PRINT "bi="; S / L: PRINT

80 N = N3: GOSUB 100: PRINT "ci="; S / L

90 GOTO 190

100 S = 0: L = 0

110 FOR I = 1 TO N

120 X = INT(RND * 10) - 5: PRINT USING "###"; X;

130 IF X > 0 THEN S = S + X: L = L + 1

140 IF N = N1 THEN A(I) = X: GOTO 170

150 IF N = N2 THEN B(I) = X: GOTO 170

160 IF N = N3 THEN C(I) = X

170 NEXT I: PRINT

180 PRINT "SA"; : RETURN

190 END


  • Листинг программы


Б


10 REM LAB9b GSA

20 CLS : DIM Z(30, 30): INPUT "A(x,y)?", X, Y: n = X: m = Y

30 GOSUB 1000

40 INPUT "B(k,l)?", k, l: n = k: m = l

50 GOSUB 1000

60 GOTO 1050

1000 IF n > 30 OR m > 30 THEN RETURN

1005 MIN = 1E+10

1010 FOR I = 1 TO n: FOR J = 1 TO m

1020 Z(I, J) = INT(RND(X) * 200) - 100: PRINT USING "####"; Z(I, J);

1025 IF Z(I, J) < MIN THEN MIN = Z(I, J): Imin = I: Jmin = J

1030 NEXT J: PRINT : NEXT I

1035 PRINT "МИН. ЭЛЕМЕНТ МАТРИЦЫ - "; MIN, "СТРОКА - "; Imin, "СТОЛБЕЦ - "; Jmin: PRINT

1040 RETURN

1050 END


  • Решение. Анализ результатов


А


2 0 0 -3 -2 2 -5 2 3 2

SAai= 2.2


-5 -1 3 2 -2 4 3 -5 4 -2 0 2 -5 0 -1

SAbi= 3


-3 1 1 -3 -3 3 3 0 4 4 -3 1 4 -3 0 -4 4 1 -5 0

SAci= 2.6


Б


A(x,y)?5,7

41 6 15 -43 -40 54 -98

52 62 41 -91 -18 72 58

-26 92 74 -89 89 -28 4

53 -90 18 -7 -41 24 29

-48 -45 65 64 17 97 82

МИН. ЭЛЕМЕНТ МАТРИЦЫ - -98 СТРОКА - 1 СТОЛБЕЦ - 7


B(k,l)?3,4

-55 39 96 -52

6 -79 99 35

-97 15 -80 -80

МИН. ЭЛЕМЕНТ МАТРИЦЫ - -97 СТРОКА - 3 СТОЛБЕЦ - 1



  • Вывод

В ходе работы были приобретены навыки по созданию алгоритмов и программ задач с использованием подпрограмм пользователя различных видов, навыки написания подпрограмм и обращения к ним, выбора параметров подпрограмм.

  • Перечень ссылок



  1. ГОСТ 19.701 – 90


ЕСПД. Схемы алгоритмов, программ, данных и систем.

Обозначения условные и правила выполнения;

Под. ред. Р.С. Фёдорова. – М.: Издательство стандартов, 1991.-

26 с.

  1. Алексеев В.Е. и др.

Вычислительная техника и программирование.

Практикум по программированию: Практ. Пособие/


В.Е. Алексеев, А.С. Ваулин, Г.Б. Петрова;

Под ред. А.В. Петрова. – М.: Высш. шк., 1991. –

400 с.: ил.





Похожие:

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconДокументы
1. /OOP/Лабораторная работа ь00-Введение.doc
2. /OOP/Лабораторная...

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconДокументы
1. /Страуструп - Язык программирования С++/CHAP000.TXT
2. /Страуструп...

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconН. Г. Волчёнков программирование на visual basic 6 Учебное пособие
Книга содержит описание многих важных идей и методов программирования на современном диалекте языка Бейсик — Visual Basic
Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconН. Г. Волчёнков программирование на visual basic 6 Учебное пособие
Книга содержит описание многих важных идей и методов программирования на современном диалекте языка Бейсик — Visual Basic
Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconПрограммирование на языке q basic Раздел 1: Язык q basic; Линейный алгоритм

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconЛабораторная работа: создание мини-презентации «Памятники Кремля»
Лабораторная работа проводится в компьютерном классе, с подключением к сети Internet
Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconДокументы
1. /ЯЗЫК ПРОГРАММИРОВАНИЯ PERL/Perl1.txt
2. /ЯЗЫК...

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconДокументы
1. /ЯЗЫК ПРОГРАММИРОВАНИЯ PERL/Perl1.txt
2. /ЯЗЫК...

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconДокументы
1. /Lab1/Лабораторная работа 1.doc
2. /Lab2/Лабораторная...

Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconИ я забуду Покажи мне и я запомню, Дай мне действовать самому и я научусь. Китайская мудрость Тема: Лабораторная работа
Тема: «Лабораторная работа «Измерение работы и мощности тока в электрической лампочке»
Лабораторная работа №9 по курсу \"Информатика\" (язык программирования basic ) iconПрограмма курса «Информатика и икт» к учебнику "Информатика" (Н. В. Макарова) 10 11 класс
Рабочая программа по курсу «Информатика и икт» ориентирована на примерную программу, составленную на основе федерального компонента...
Разместите кнопку на своём сайте:
Документы


База данных защищена авторским правом ©podelise.ru 2000-2014
При копировании материала обязательно указание активной ссылки открытой для индексации.
обратиться к администрации
Документы

Разработка сайта — Веб студия Адаманов