Угринович Н., Босова Л., Михайлова Н. Практикум по информатике и информационным технологиям

Подождите немного. Документ загружается.

380

Ответы и указания по выполнению заданий

значение

ячейке самой функции не возвращает нужный

результат.

Точность подбора зависит

от

заданной точно-

сти представления чисел

ячейках таблицы.

Ввести формулы функций

заполнить таблицу значений

функций

на интервале от -2,5 до 2,5

шагом 0,5. Устано-

вить точность представления чисел

ячейках

точно-

стью

знака после запятой.

Построить графики функций.

По

графикам

грубо

при-

ближенно можно определить, что уравнение имеет корни

х±

« ~&,

x<i

~ 0, х$ ~ Z.

Выделить ячейку, содержащую значение функции наи-

более близкое

нулю, например, $К$3. Ввести команду

[Сервис-Подбор параметра...].

На

панели

Подбор

параметра

поле

Конечное

значе-

ние ввести требуе-

мое значение фун-

кции

(в

данном

случае

0).

В поле

изменяемая

ячейка

ввести адрес ячейки $К$2,

которой

будет

производиться подбор значения аргумента.

5 На панели

Результат

подбора

параметра

будет

выведе-

на

информация

величине подбираемого

подобранного

значения.

ячейке аргумента

К2

появится подобранное значение

2,0648.

Повторить подбор параметра для ячейки значе-

ния

функции СЗ.

ячейке аргумента С2 появится подо-

бранное значение

-2,0648.

Lfd'.^

.I'rirjAl™

LLH.:::ii:..i.L::J:j.:^vd:.l!!!i..:'L.L!.:'.k::.^i

Таблица значений функций

Т1

-2.5000-2,0648 -1,5648 -1,0648 -0,5000 0,0000 0.5000

1.0000

1.5000

2,0648 2,5648

;:VjY=X

3/10-Sin(x)

-0,9640 0,0002 0,6169 0.7540 0,4669 0.0000 -0.4669-0.7415; -0,6600 -0,0002

1.1417

•т.

•

б:

jo]

'11!

'Tai

.....„.,

18 1

..vi

: 22!

Решение

уравнения методом подбора параметров

1.00

•

0.50

0.00

•

-0.50V

-1.00

-1.50

{

Ответы

указания

по

выполнению

заданий

7 Таким образом, корни уравнения с точностью до четырех

знаков

после запятой нйдены: х

-2,0648,

~ 0

0000

2,0648.

6.3. Проект «Бросание кубика» хранится в папке \practi-

cum\VB\projects\Z6_3\.

Поместить на форму графическое поле, в котором на чис-

ловой оси X на отрезке от 0 до 6

будет

отображаться про-

цесс случайной генерации точек. Падению кубика на

каждую

из шести граней поставим в соответствие одина-

ковые числовые интервалы.

2 Поместить на форму текстовое поле txtN для ввода числа

генерируемых точек и поля txtl, txt2, txt3, txt4,

txt5 и

txt6

для вывода числа точек, попавших в каж-

дый из числовых интервалов.

3 Поместить на форму кнопку и создать для нее событий-

ную процедуру, которая обеспечивает ввод количества ге-

нерируемых точек в переменную lngN, генерацию слу-

чайных точек и подсчет в переменных

lngl,

Ing2,

Ing3,

Ing4, Ing5 и Ing6 количества точек, попавших в

каждый из числовых интервалов:

Dim

dblX

As Double, I, lngN,

lngl,

Ing2,

Ing3,

Ing4, Ing5, Ing6 As Long

Private Sub cmdl Click()

lngl

Ing2

Ing3

Ing4

Ing5

Ing6

lngN

picl,

= 0

= txtN.Text

.Cls

.Scale

(0,

l)-(6,

-1)

'Генерация

точек

For

dblX

picl.

= 1 To lngN

= 6 * Rnd

.PSet (dblX, 0)

Select

Case dblX

Case

lngl

Case

Ing2

Case

Ing3

Case

Ing4

To 1

= lngl + 1

To 2

= Ing2 + 1

To 3

= Ing3 + 1

3 To 4

= Ing4 + 1

382

Ответы

указания

по

выполнению

заданий

Case

4 То 5

Ing5

= 1пд5 + 1

Case

5 То 6

1пд6

= 1пд6 + 1

End

Select

txtl.Text =

lngl

txt2.Text = Ing2

txt3.Text = Ing3

txt4.Text = Ing4

txt5.Text = Ing5

txt6.Text = Ing6

End

Sub

4 Ввести количество генерируемых точек. После щелчка

по

кнопке Пуск

графическом поле

будет

отображен про-

цесс генерации случайных точек,

а в

текстовые поля вы-

ведены количества выпадений кубика на каждую из шес-

ти граней.

5 При увеличении количества генерируемых точек можно

наблюдать все меньшее различие

количествах падения

кубика на различные грани.

6.4.

а)

Файл triangle_1

.frw

находится

каталоге \practicum\inf-

tech\cad\.

Алгоритм выполнения заданного построения

следую-

щий:

1. Построить

угол

А, равный заданному

углу

(смотри

практическое задание 4.9).

2. Отложить на сторонах

угла

отрезки, равные заданным

отрезкам MN

PQ, обозначить их

АВ и ВС.

3. Соединить отрезком точки

Б и

С. Треугольник постро-

ен.

Ответы

указания

по

выполнению

заданий

383

Л'1..11Г-Т'И1'Г.>'Ч.1ДЩЧ».И

.11:пл.».ики.»|;г.1:<.1;

Р1Р1

8мммип»-

1М

Охрами*

£е»»*\.й«стойк*

;

Дкно

6.4.

б)

Файл triangle_2.frw находится

каталоге \practicum\inf-

tech\cad\.

1. Провести прямую и отложить на ней отрезок, равный

по

длине заданному RS. Обозначить концы отрезка бук-

вами А и Б.

2. Построить окружность с центром в точке А и

радиу-

сом,

равным длине заданного отрезка MN.

3. Построить окружность с центром в точке Б и

радиу-

сом,

равным длине заданного отрезка PQ.

4. Построить отрезки АС и ВС. Треугольник построен.

010Ы«Г^

384

Ответы

указания

по

выполнению

заданий

6.5. Компьютерная модель «Бросание тела под

углом

к гори-

зонту»

в файле

calc.xls

в каталоге \practicum\inftech\calc\

(лист

Бросание

тела

под углом).

Вернемся к третьему этапу создания и исследования мо-

дели движения тела, брошенного под

углом

к горизонту.

Преобразуем теперь формальную модель в компьютер-

ную с использованием электронных таблиц StarCalc.

Выделим в таблице определенные ячейки для ввода зна-

чений

начальной скорости v

угла

а и вычислим по фор-

мулам 5.1 значения координат тела хну для определен-

ных значений времени t с заданным интервалом.

Для преобразования значений

углов

из

градусов

в радиа-

ны

используем функцию РАДИАНЫ().

Для ввода начальной скорости

будем

использовать ячей-

ку В1, а для ввода

угла

— ячейку В2.

2 Введем в ячейки

А5:А16

значения времени с интервалом

0,2 с.

3 В ячейки В5 и С5 введем формулы:

=$В$1*СО8(РАДИАНЫ($В$2))*А5

=$B$l*SJN(PAflHAHbI($B$2))*A5-4,9*A5*A5

= 17,0 м/с

а= 31,Оград

0.00

0.20

0.40

0.60

0.80

1.00

1.20

1,40

1.60

1,80

2.00

16!

2.20

X = V Q

'COSCL*

0.00

2.91

5.83

8.74

11.66

14.57

17.49

20.40

23.31

26.23

29.14

32.06

=vо

sina-t-g-t

0.00

1.55

2,72

3.49

3.87

3.85

3.44

2.64

1.45

-0.13

-2.11

-4.48

Скопируем формулы в ячейки

В6:В16

и С6:С16 соответст-

венно.

Визуализируем модель, построив график зависимости

координаты у от координаты х (траекторию движения

тела).

Построим

диаграмму типа

График,

в которой использует-

ся

в качестве категории диапазон ячеек

В5:В16,

а в каче-

стве значений — диапазон ячеек С5:С16.

Ответы и указания по выполнению заданий

385

5,83 11,66 17,49 23,31

-6,00

Исследуем модель

определим

заданной точностью

0,1

градуса

значения диапазона изменений

угла,

которые

обеспечивают попадание

площадку, находящуюся

на

расстоянии

25 м и

длиной

2 м, при

заданной начальной

скорости

17 м/с.

Воспользуемся

для

этого методом

Под-

бор

параметра.

6 Установить

для

ячеек точность один знак после запятой.

7 Ввести

ячейки

В19 и В20

значения

начальной скорости

= 17 м/с и

угла

а = 31

град,

а в

ячейку

В22

фор-

мулу

для

вычисления координаты

мячика

для

заданных начальных

условий:

=В

1Г2

*SIN(P

АДИ А-

НЫ(2*В20))/9,81

8 Выделить ячейку

В22 и

ввести команду [Сервис-Подбор

параметра...].

На

появившейся диалоговой панели ввести

поле

Конеч-

ное

значение

координату ближнего края площадки

— 25.

В поле

изменяемая

ячейка

ввести адрес ячейки, содержа-

щей значение

угла

(в

данном

случае

$В$20).

17,0

м/с

31,0

град

26,0

Подбор

параметра

-Заданные значения::;:'-'.;.:;.

;

Ячейка формул

•'•"'

j$B$22

Конечное значение

J25

изменяемая

ячейка

|$В$20

'..'•":•

Отмена

Справка

После щелчка

по

кнопке

Да

на

появившейся панели

StarOffice

Calc в

ячейку

В20

будет

записано значе-

ние

29,0.

StarOffice

Calc

Подбор

параметра был удачным.

Вставить результат

(29,0)

текущую ячейку?

386

Ответы

указания

по

выполнению

заданий

10 Повторить процедуру подбора параметра для попадания в

дальний край площадки, в ячейке В20 получим значение

33,2. Таким образом, существует диапазон значений

угла

бросания

от 29,0 до 33,2 градусов, в котором обеспечива-

ется попадание в площадку.

11 Повторить процедуру определения диапазона углов при

начальном значении 55 град, получим значения предель-

ных углов 56,8 и 61,0 градуса. С учетом точности вычис-

лений

данные для обоих диапазонов углов подтверждают

результаты, полученные при исследовании компьютер-

ной

модели на языке

Visual

Basic.

6.7. Интерактивная карта России находится по адресу

http://nakarte.ru.

6.8. Геоинформационная модель в файле mapstats.xls хранит-

ся

в каталоге \textbook\Excel\ (лист

Страны

мира).

6.11. Проект «Оптимизационное моделирование» хранится в

каталоге \practicum\ VB\Projects\Z6_J 1\.

Наборы параметров, при которых выполняются условия

ограничений,

можно найти перебором вариантов с помо-

щью вложенных циклов:

Private Sub cmdl_Click()

For

XI = 0 To 100

For

X2 = 0 To 100

For

X3 = 0 To 100

If 3

XI + 2 *

2 * X2 +

"Параметры:

"Целевая

функция:

End i

ХЗ

Sub

XI;

;

15 And 1

Then

X2; X3:

X2 + X3

Щ||^РУ|1^1|1^|^

;

_inl xl

Параметры: 3 2 2

Щелевая

функция: 7

Оптимизация

6.12. Готовое задание хранится в файле Model.xls в каталоге

\practicum\inftech\calc\.

6.13. Проект «Управление с автоматической обратной связью»

хранится в каталоге \practicum\VB\Projects\Z6_13\.

Ответы и указания по выполнению заданий

387

7.2.

7.3.

7.4.

7.40.

Ответы

главе

Информационные

ресурсы

Интернета

800

бит/с.

800

бит/с.

Время передачи графического файла.

Для определения информационного объема графического

файла

необходимо количество

бит на

одну точку умно-

жить

на

количество точек изображения:

бит

•

10000

= 160 000 бит.

Минимальное

время передачи

будет

достигаться при мак-

симально возможной для этого соединения скорости.

Для

определения времени передачи необходимо информаци-

онный

объем графического файла разделить

на

максима-

льную

скорость передачи информации

по

каналу:

160

000 бит : 33 200

бит/с

~ 5 с.

http://schools. techno.ru/sch444

ШШыЖ^^Ш^'Ш^Ш^-

http://www.intel.ru

388

*Ж<

С#

...

.•«г:

МУЗЕЙ

http://www.computer-museum.ru

7.41.

Правка

Вив

Избранное Сдммс £праекл

';'с»ргд Остановить Обновить Домой

]

http //wwjjj {^Переход

Ссылки

] jr

Ryswwrt

Поиск

Избранное

Рунет

сегодня

Количество уникальных серверов:

318 685

Количество уникальных UBL:

40 545 687

Объем проиндексированной информации:

640,87

Гб

Интернет

http://www.yandex.ru/chisla.html

Э(

Rambler статистика: Тематический состав Рунета

Microsoft Internet С^„

Правка |1ид

Избранное

•

Сервис ^правка.

11,06-17•06

•

172 -

Компьютеры

Интернет

•

162 -

Рйзвлечения

•

162 -

Деловой МИР

82 -

Дом

семь?)

•

62 -

Овщественняя жизнь

•

52 -

Науки

оврйзоврние

[§Э

322 -

Остяльное:

Музыки

Путешествия

ТРЙНСПОРТ

Авто,

мото

Новости

СМИ

http://rumetrica.rambler.ru/data/runet/2/

аты

и указания по выполнению заданий

389

' Ш

: <3

!C«Forcc2

32Mb

- 91 ул. Оипж 650

•

55 у.«

iMatn»

<;4S0

OO« - 114 у.е. Atiik>n

5Г<0

65 y.

!C«rarc«2

CIS .12Mb - 198 у.*. A'M.m 70» - 98 у t

;i ;.;

-:лл&. г.«т/^^<кьа и »^>rs*.a скмдки мя

>wt^(,-rc»

'.^.imitMM-o

и рекламу лв 50»»

MOCK»»

' - •

http://www.freesoft.ru

пая в«рсяя бр»у зера Optra, патучшшиго широкую

HOCii.

зя скорость paootu я удобный инг«^феяс со

с1»(ж

иастросг. Включает лочгоамй клдеш:,

клиги

-""~ ~—~ %*iS"

- """f

http://www.freeware.ru

DOWNLOAD-^

НоТыЕго

увкдишь

http://www.download.ru