ВОСТОЧНАЯ ЭКОНОМИКО-ЮРИДИЧЕСКАЯ ГУМАНИТАРНАЯ АКАДЕМИЯ (Академия ВЭГУ)
Стерлитамакский институт
Пояснительная записка
к контрольной работе
«Решение задач на языке программирования TurboBasik»
Вариант № 4
Выполнила: студентка ЗО
ФИК, гр. СПО-09
Проверила: к. ф-м н. доцент
Стерлитамак 2010
Содержание
Задание 1
Задание 2
Задание 3
Задание 4
Задание 5
Литература
Задание №1
1.1
Постановка задачи
Имеются четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что числа расположены в возрастающем порядке?
1.2
Блок – схема
Да Нет
Да Нет
Да Нет
1.3
Исходный текст программы
CLS
INPUT "Введите A="; A
INPUT "Введите B="; B
INPUT "Введите C="; C
INPUT "Введите D="; D
k = 0
IF NOT (A < B) THEN k = k + 1
IF NOT (B < C) THEN k = k + 1
IF NOT (C < D) THEN k = k + 1
IF k = 0 THEN PRINT "Правда" ELSE PRINT "Неправда"
END
1.4
Экранная форма
Введите A=? 1
Введите В=? 2
Введите С=? 3
Введите D=? 4
Правда
Задание №2
2.1 Постановка задачи
Составить программу вычисления и выдачи на печать суммы/произведения N элементов бесконечного числового ряда у = 2 – 6 + 18 – 54 + 162 – …
2.2 Блок-схема
2.3 Исходный текст программы
CLS
INPUT "Введите N="; N
S = 0
P = 1
FORI = 1 TON
S = S + (2 * 9 ^ I - 6 * 9 ^ I)
P = P * (2 * 9 ^ I - 6 * 9 ^ I)
NEXT I
PRINT "Сумма бесконечного ряда S=", S
PRINT "Произведение бесконечного ряда P=", P
END
2.4 Экранная форма
Введите N=? 4
Сумма бесконечного ряда S= – 29520
Произведение бесконечного ряда P= 8.926168E+11
Задание №3
2.5 Постановка задачи
Имеется массив А из N произвольных чисел (А(N)), среди которых есть положительные, отрицательные и равные нулю. Напечатать все числа из очереди, квадрат которых превышает 7, но меньше 50.
2.6 Блок-схема
2.7 Исходный текст программы
CLS
INPUT "N="; N
DIMA(N)
FORI = 1 TON
PRINT "A("; I; ")=";
INPUT A(I)
NEXT I
FOR I = 1 TO N
PRINT A(I); " ";
NEXT I
PRINT
FOR I = 1 TO N
IF (A(I) ^ 2 > 7) AND (A(I) ^ 2 < 50) THEN PRINT A(I); " ";
NEXT I
END
2.
8
Экранная
форма
N=? 7
A(1)=? 2
A(2)=? 4
A(3)=? -3
A(4)=? 3
A(5)=? 5
A(6)=? -2
A(7)=? 8
2 4 -3 3 5 -2 8
4 -3 3 5
Задание №4
4.1 Постановка
задачи
Забиваем Сайты В ТОП КУВАЛДОЙ - Уникальные возможности от SeoHammer
Каждая ссылка анализируется по трем пакетам оценки: SEO, Трафик и SMM.
SeoHammer делает продвижение сайта прозрачным и простым занятием.
Ссылки, вечные ссылки, статьи, упоминания, пресс-релизы - используйте по максимуму потенциал SeoHammer для продвижения вашего сайта.
Что умеет делать SeoHammer
— Продвижение в один клик, интеллектуальный подбор запросов, покупка самых лучших ссылок с высокой степенью качества у лучших бирж ссылок.
— Регулярная проверка качества ссылок по более чем 100 показателям и ежедневный пересчет показателей качества проекта.
— Все известные форматы ссылок: арендные ссылки, вечные ссылки, публикации (упоминания, мнения, отзывы, статьи, пресс-релизы).
— SeoHammer покажет, где рост или падение, а также запросы, на которые нужно обратить внимание.
SeoHammer еще предоставляет технологию Буст, она ускоряет продвижение в десятки раз,
а первые результаты появляются уже в течение первых 7 дней.
Зарегистрироваться и Начать продвижение
Составитьпрограммувычислениячисловогорядадляизвестногочислачленовряда N: Y = (1/24
+ 1)(2/23
– 2)(3/22
+ 4)(4/21
– 8)…
4.2 Блок-схема
4.3
Исходный
текст
программы
CLS
INPUT "N="; N
Y = 1
FOR I = 0 TO N
A = (I + 1) / 2 ^ (4 - I)
B = (-1) ^ (I + 2)
C = 2 ^ I
X = A + B * C
Y = Y * X
NEXT I
PRINT "Otvet Y="; Y
END
4.4
Экранная
форма
N=? 4
Y = 1112.836
Задание №5
5.1 Постановка задачи
В матрице размера 4х3 найти значение максимального элемента в каждой строке.
5.2
Блок-схема
5.3 Исходный
текст
программы
CLS
DIM A(4, 3)
RANDOMIZE TIMER
FOR I = 1 TO 4
FOR J = 1 TO 3
A(I, J) = INT(RND * 20) - 8
PRINT A(I, J);
NEXT J
PRINT
NEXT I
FOR I = 1 TO 4
max = A(I, 1)
FOR J = 1 TO 3
IF A(I, J) > max THEN max = A(I, J)
NEXT J
PRINT "max("; I; ")="; max
NEXT I
END
5.4
Экранная
форма
-2 -2 -5
2 0 7
6 1 -4
5 5 -7
max (1) = -2
max (2) = 7
max (3) = 6
max (4) = 5
Литература
1.Информатика и информационные технологии. Учебное пособие. Под ред. Романовой Ю.Д. (2008, 3-е изд., 592с.)
2.Задачник–практикум по информатике. Под ред. Семакина И.Г.,
Хеннера Е.К. (2001, 189с.)
3.Справочные материалы по программированию на языке Бейсик. Под ред. Житкова О.А., Кудрявцева Е.К. (2002, 3 гл.)
4.Бейсик и Паскаль: от простого к сложному. Под ред. Житкова О.А., Кудрявцева Е.К. (2002, 4 гл.)
5.Информатика. Учебник для вузов. Под ред. Симоновича С.В. (2005, 20 гл.)
6.Информатика. Учебник для вузов. Под ред. Макаровой Н.В. (2005, 18 гл.)
7.Информатика. Учебное пособие для студентов. Под ред. Хеннера Е.К. (2004, 3 гл.)
8.Алгоритмический язык Basic. Пособие для студентов. Под ред. Майера Р.В.
(2005, 124с.)
9.Технология алгоритмического программирования. Пособие для студентов. Под ред. Ефимова О.А., Морозова В.В. (2005, 204с.)
10. Программирование на языке Бейсик. Учебное пособие. Под ред. Петракова А.М., Воройского Ф.С., Макаровой Н.В. (2008, 256с.)
|
