16332

Программирование алгоритмов циклической структуры

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторная работа № 4 Программирование алгоритмов циклической структуры Цель: приобретение навыков программирования алгоритмов циклической структуры с помощью подпрограммыпроцедуры позволяющую вычислять сумму произведение конечного ряда с помощью операторо

Русский

2013-06-20

128.5 KB

15 чел.

Лабораторная работа № 4

Программирование алгоритмов циклической структуры

Цель: приобретение навыков программирования алгоритмов циклической структуры с помощью подпрограммы-процедуры, позволяющую вычислять сумму (произведение) конечного ряда с помощью операторов цикла с параметром, с предусловием, с постусловием.

Индивидуальные варианты лабораторной работы № 4 представлены в таблицах 6, 7 

Перед  выполнением  лабораторной работы № 4  разберите

Пример 7

Пример 7

Постановка задачи. Вычислить сумму конечного ряда с помощью подпрограммы-процедуры.

Технология выполнения задания:

1. Исходные данные: i  Z, Результат: S  R.

2. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл с предусловием While:

Sub summa()

Dim S As Integer

Dim i As Integer

S = 0

i = 1

Do While i <= 10

S = S + i ^ 2

i = i + 1

Loop

MsgBox (S)

End Sub

3. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл с предусловием Until:

Sub summa()

Dim S As Integer

Dim i As Integer

S = 0

i = 1

Do Until i > 10

S = S + i ^ 2

i = i + 1

Loop

MsgBox (S)

End Sub

4. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл с постусловием While:

Sub summa()

Dim S As Integer

Dim i As Integer

S = 0

i = 1

Do

S = S + i ^ 2

i = i + 1

Loop While i <= 10

MsgBox (S)

End Sub

5. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл с постусловием Until:

Sub summa()

Dim S As Integer

Dim i As Integer

S = 0

i = 1

Do

S = S + i ^ 2

i = i + 1

Loop Until i > 10

MsgBox (S)

End Sub

6. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл с параметром (со счетчиком FOR):

Sub summa()

Dim S As Integer

Dim i As Integer

S = 0

For i = 1 to 10

S = S + i ^ 2

Next i

MsgBox (S)

End Sub


Таблица 6

№ В

Варианты индивидуальных заданий

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

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

Таблица 7

№ В

Варианты индивидуальных заданий

Разработать экономическую пользовательскую процедуру

1

Вычислить 5 значений уровня цен на автомобили  на  рынке, если объем денежной массы остается неизменным.

P=M*V/Q

где

P - уровень цен;

M - объем денежной массы;

V - скорость обращения денег;

Q - количество обращающегося товара.

2

Мы положили в банк 10000 р. на 5 лет при ставке 10% в год. Текущая стоимость составляет 10000 р. Вычислить ежегодную прибыль

FV=PV*(1+R)^N

где

FV - прибыль;

PV - текущая стоимость;

R - ставка процента;

N - число лет.

3

Рассчитать реальную заработную плату VP по формуле VP=VN/P. Если уровень цен P меняется от P1 до P2, шаг изменения уровня цен = 1.

где

Р1 - начальный уровень цен;

P2 - конечный уровень цен;

VP - заработная плата;

VN - номинальная заработная плата;

  Р - уровень цен.

4

Рассчитать какой доход получит владелец акции, купив ее по рыночной цене P, если рыночная цена изменяется на 300 денежных единиц каждый год, а дивиденд на акцию фиксирован. Доход на акцию рассчитывается по формуле:

ДОХОД = ДИВИДЕНД*100/РЫНОЧНАЯ ЦЕНА АКЦИИ

5

Начислить сумму износа  по объекту основных средств за 6 месяцев, если дана первоначальная стоимость объекта, годовая норма в %, используя формулу:

износ за 1 месяц = первонач.стоимость*норму годовую/12 мес

т.е. I = S * N/12

где  

I - сумма износа за месяц;

S - первоначальная стоимость;

N - норма годовая (8.9%).

6

Оформлен депозитный вклад в банке на сумму 5 млн.р. при ставке (R) 10% в год. Составить программу, вычисляющую будущую стоимость вклада (FV), если известно, что текущая стоимость (PV) составляет 10 млн. р., а число лет, на которые оформлен вклад равно 5.

7

В 1626 г индейцы продали о.Манхеттен за 20$. Если бы эти деньги были помещены в банк под 4% в год, то какова была бы стоимость  капитала в 1996 г?

8

Выявление зависимости экономической ситуации от величины Спроса (С) и Предложения (P), по формуле:

C = F*Q, P = F*S

где

    F - коэффициент  функциональной  зависимости;

Q, S – цена.

9

Рассчитать темпы роста безработицы с A года по B год и в целом за     данный период по формулам:

C = (D-E)/D*100, F=D-J/D*100

где

C - темп  роста  безработицы  в A+I+1 году;

D - индекс безработицы в A+I+1 году;

E - индекс безработицы в A+I году;

F - на сколько выросла безработица в период с A по B годы, где A = 1990 год, B = 1993 год.

10

 В фирме работают 20 человек, каждый из них получает разную зарплату: 5 из них получают 800.000 рублей, 7 из них получают 500.000 рублей, 8 из них получают 300.000 рублей, нужно вы числить среднюю зарплату всех рабочих, по формуле:

P = K/N

где

P - средняя зарплата рабочих,

K - количество получаемых денег;

N - количество людей получающих деньги.

11

Определить рыночную стоимость облигаций по формуле

PV = сумма (I = 1.. N) P/(1+ R)

где

PV - рыночная стоимость облигации;

P – доход;

R - процент от облигаций;

N - количество лет.

12

Как будет меняться прибыль предприятия при изменении цены за единицу продукции, если объём выпускаемой продукции и себестоимость за единицу продукции останутся неизменными:

объём выпуска - 1500 ед.;

себестоимость за единицу продукции – 1004;

начальное значение цены – 140;

конечное значение цены – 200;

шаг изменения цены – 20.

13

Вычислить среднемесячный уровень безработицы в течении года ,используя формулу:

уровень безработицы = среднемесячная численность безработных /численность рабочей силы

Учитывая, что численность рабочей силы растет, увеличиваясь каждый раз на 2 процента.

14

Пенсионерка положила в банк в январе 1995 года 500 тыс.р. Сколько она возьмет через полгода (18 месяцев), если банк начисляет 5 процентов в месяц?

15

Вычислить доход на акцию предприятия, учитывая, что дивиденд на акцию изменяется в течение некоторого времени с [DN, DK] с шагом H.

Y = ((D*D+1)/D)*100%

где

D – дивиденд.

16

Вычислить среднегодовую стоимость (Сс) оборудования за период с момента окончания планового срока лизингового соглашения до полной амортизации оборудования на начало года по формуле

Сс = (Сн+Ск)/2*Т

где

Сн - стоимость оборудования на начало года;

Ск - стоимость оборудования на конец года;

 Т - период с момента окончания планового срока лизингового соглашения до полной амортизации оборудования.

17

Цех располагает 50 ткацкими станками, из которых 30 работают в течение 20 лет. 12 в течение 6 лет, 8 в течение 6 лет. Вычислить средний возраст оборудования.

18

Вычислить процентные деньги с N рублей за t дней по формуле:

A = N*P%*t/100%*360

где

A - процентные деньги;

t - число дней;

P - ставка процента.

19

Списан автомобиль грузоподъемностью до 2 тонн. Первоначальная стоимость автомобиля составляла 10000 рублей, норма амортизации за месяц составляла 1.4% в месяц. Вычислить сумму амортизации на автомобиль за любой месяц первых пяти лет по формуле:

S = P*N*K/100%

где

К - количество месяцев;

P - цена машины;

N - норма амортизации;

S - сумма амортизации.

20

Вычислить средний возраст оборудования, вычисляемый по отношению общей суммы лет фактической эксплуатации всех машин f к количеству единиц этого оборудования м, где t-средний возраст оборудования, лет.



 

А также другие работы, которые могут Вас заинтересовать

6341. Джерела та основні принципи трудового права 217.5 KB
  Джерела та основні принципи трудового права Поняття джерел трудового права України, їх класифікація Суспільні відносини, що виникають при використанні праці, потребують правового регулювання, яке здійснюється прийняттям відповідних юридичних но...
6342. Форматування символів і абзаців. Форматування сторінок документа 193.5 KB
  Форматування символів і абзаців Форматування документа - це процес оформлення його загального вигляду та підготовки до друкування, тобто робота над формою (зовнішнім виглядом) документа. Текст можна форматувати під час його набирання або після ...
6343. Екологічні фактори 132.5 KB
  Екологічні фактори Поняття про екологічні фактори, їх види Абіотичні фактори. Біотичні фактори. Антропогенні фактори. Дія екологічних факторів. I. ПОНЯТТЯ ПРО ЕКОЛОГІЧНІ ФАКТОРИ, ЇХ ВИДИ. В процесі еволюційного ро...
6344. Інтернет у системі джерел банківської, фінансової і підприємницької інформації 38.53 KB
  Інтернет у системі джерел банківської, фінансової і підприємницької інформації 1. Світовий ринок інформаційних технологій у фінансовій сфері. Розглянемо результати і перспективи розвитку ринку інформаційних технологій та нові тенденції. Слід відміти...
6345. Основні законодавчі акти, норми та правила, що регулюють умови праці та її охорону в Україні 130 KB
  Основні законодавчі акти, норми та правила, що регулюють умови праці та її охорону в Україні Конституція України - основа всього законодавства країни, прийнята 28 червня 1996 року. Вона містить ряд статей, які стосуються питань охорони праці, з...
6346. Юрист, як представник фізичних і юридичних осіб в сфері кримінального судочинства 145.5 KB
  Зміст 1. Право особи на отримання кваліфікованої юридичної допомоги: конституційно та міжнародно-правові аспекти. 2. Правові підстави участі представника у кримінальному судочинстві. 3. Правові підстави участі захисника у кримінальному судочин...
6347. Міжнародний спортивний рух. Фізкультурно-спортивний рух в Україні 162 KB
  Міжнародний спортивний рух. Фізкультурно-спортивний рух в Україні Метою лекції є вивчення особливостей становлення та розвитку міжнародного спортивного руху та фізкультурно-спортивного руху в Україні. Завдання лекції: Виявити закономірності ст...
6348. Інформаційна система та її структура 129.5 KB
  Інформаційна система та її структура Мета: Дати поняття інформаційної системи, апаратної та програмної складової ІС Розглянути функціональну схему комп'ютера (принцип фон Неймана) Розглянути магістрально-модульний принцип будо...
6349. Оздоблення напівфабрикати в кондитерському виробництві, фаршів та начинки 87.5 KB
  Оздоблюючи напівфабрикати в кондитерському виробництві, фаршів та начинки Технологія приготування кремів: масляних, білкових, заварних. Оздоблення виробів кремом за допомогою гребінця, паперових корнетиків, кондитерських мішків з набором...