23823

Вирази та функції

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

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

5 демонструє роботу даного додатка перебування значення річного приросту при відомих значеннях числа виплат24 суми кредиту 120000 і величини щомісячної виплати 6000 Вікно робочого додатка Кредит: Програмний код для цього додатка: Dim r As Single n As Integer v As Currency p As Currency Private Sub Command1_Click r = ValText1.Text n = ValText2.Text v = ValText3.Text r = r 1200 p = Pmtr n v Text4.

Украинкский

2013-08-04

50 KB

5 чел.

ЗВІТ

з лабораторної роботи № 3

" Вирази та функції"

виконав студент IІ курсу відділення МІ група 2  

Киричук Олег Романович 

Дата виконання "5" листопада 2008 р.

Виконання завдань:

1. На екранній формі 4 текстових поля і 3 командні кнопки. Текстові поля призначені для вводу чи виводу наступних величин:

  1.  річного банківського приросту вартості (у відсотках);
  2.  числа періодичних (наприклад, щомісячних) виплат;
  3.  суми отриманого в банку кредиту (приведеної вартості);
  4.  величини однієї виплати.

1-у, 3-у і 4-у величини цього списку можна знайти за допомогою представлених вище фінансових функцій, якщо інші величини цього списку відомі.

Для цієї мети і служать командні кнопки. Для кожної з них написана окрема процедура подія Клік кожної з цих кнопок після вводу трьох чисел у три текстові поля викликає появу четвертого числа в текстовому полі, що залишилося незаповненим.

Мал. 4.5 демонструє роботу даного додатка — перебування значення річного приросту при відомих значеннях числа виплат(24), суми кредиту (120000) і величини щомісячної виплати (6000)

Вікно робочого додатка «Кредит»:

Програмний код для цього додатка:

Dim r As Single, n As Integer, v As Currency, p As Currency

Private Sub Command1_Click()

r = Val(Text1.Text)

n = Val(Text2.Text)

v = Val(Text3.Text)

r = r / 1200

p = -Pmt(r, n, v)

Text4.Text = Str(p)

End Sub

Private Sub Command2_Click()

r = Val(Text1.Text)

n = Val(Text2.Text)

p = Val(Text4.Text)

r = r / 1200

p = -p

v = PV(r, n, p)

Text3.Text = Str(v)

End Sub

Private Sub Command3_Click()

n = Val(Text2.Text)

p = Val(Text4.Text)

v = Val(Text3.Text)

p = -p

r = Rate(n, p, v) * 1200

Text1.Text = Str(r)

End Sub

2. Створив форму, яка  містить п’ять об’єктів типу текстове поле. У текстове поле вводиться один рядок, що містить назву країни, столицю і кількість територіальних одиниць адміністративного поділу. Програма поміщує в окремих  текстових полях інформацію про назву країни, столицю і кількість територіальних одиниць адміністративного поділу.

Програмний код для цього додатка:

Private Sub Command1_Click()

Dim a, b, c As Integer

a = InStr(Text1.Text, " ")

Text2.Text = Left(Text1.Text, a)

b = InStr(a + 1, Text1.Text, " ")

c = b - a

Text3.Text = Mid(Text1.Text, a + 1, c)

Text4.Text = Mid(Text1.Text, b + 1)

End Sub


 

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

39171. Основные положения по нормоконтролю и предварительной защите дипломных работ 729 KB
  Общие требования кафедры к содержанию и структуре дипломной работы 10 4.Общие требования кафедры к оформлению дипломной работы 11 5.Образцы оформления и требования к оформлению отдельных фрагментов дипломной работы: 13 титульный лист образец 1 14 реферат...
39172. ДЕРЖАВНЕ ПРАВО ЗАРУБІЖНИХ КРАЇН 3.29 MB
  Тимченко ДЕРЖАВНЕ ПРАВО ЗАРУБІЖНИХ КРАЇН Рекомендовано Міністерством освіти і науки України як навчальний посібник для студентів КИЇВ2005 вищих навчальних закладів УДК342187075. Б 86 Державне право зарубіжних країн: Навчальний посібник. 504 с ISBN 9663640545 Навчальний посібник являє собою комплекс навчальнометодичних матеріалів до курсу Державне конституційне право зарубіжних країн який є обов'язковим для викладання у вищих юридичних закладах IIIIV рівня акредитації. 2005 Центр навчальної літератури 2005...
39173. Аудит финансовых результатов предприятий торговли ООО «Рассвет» 513.5 KB
  Прибыль – конечный финансовый результат слагается из финансового результата от реализации продукции работ услуг основных средств и иного имущества предприятия и доходов от прочих операций уменьшенных на сумму расходов по этим операциям. Они более полно чем прибыль отражают окончательные результаты хозяйствования потому что их величина показывает соотношение эффекта с наличными или использованными ресурсами. В результатах деятельности предприятия заинтересованы учредители предприятия которые получают дивиденды инвесторы...
39174. ПРАКТИЧЕСКИЙ АСПЕКТ ВЗАИМОДЕЙСТВИЯ СЕМЬИ И ШКОЛЫ 408 KB
  Это прежде всего падение жизненного уровня большинства семей решение проблем экономического а порой и физического выживания усилило социальную тенденцию самоустранения многих родителей от решения вопросов воспитания и личностного развития ребенка. Процесс взаимодействия семьи и школы направлен на активное включение родителей в учебновоспитательный процесс во внеурочную досуговую деятельность сотрудничество с детьми и педагогами. Это семьи где ребёнок живет в постоянных ссорах родителей где родители употребляют спиртные напитки и...
39175. Мектептерде музыка пәні арқылы халықтың тәрбие берудің мән-мағынасы 463.5 KB
  3 Музыка мен әдебиеттің байланысы 2 Тәжірибелік жұмыстағы әдістер 2.1 Музыкалық тәрбие берудің маңызы мен міндеттері 2.1 Музыкалық білім мен тәрбие берудің қалыптасуы мен дамуы 3.2 Музыка мектебінде білім мен тәрбие беру 3.
39176. РАЗРАБОТКА ОПТИМАЛЬНОГО ВАРИАНТА ОРГАНИЗАЦИИ ДОСТАВКИ КОНТЕЙНЕРНЫХ ГРУЗОВ ООО «СИСТОКСЕВИС» 7.52 MB
  Виды доставок и технологические схемы перевозки Особенности транспортно-логистических систем различных видов транспорта и их взаимодействие Логистическая информация как стратегический ресурс транспортного потока. Транспортные компании ищут пути повышения доходов от своей деятельности что особенно актуально в условиях острой конкуренции на транспортном рынке и не...
39177. Разработка автоматизированной системы планирования закупок 2.59 MB
  Подсистема сбыта позволяет работать с потребителями позволяет учитывать продажи товаров. При этом многообразие его параметров технологических и объемнопланировочных решений конструкций оборудования и характеристик перерабатываемой номенклатуры товаров относит склад к сложным системам. Технологический процесс на складах основу которого составляют материальные потоки должен отвечать оптимальным параметрам по скорости процесса обеспечивать сохранность товаров и экономичность затрат. Нормативная оборачиваемость товаров зависит от задач...
39178. ТЕОРІЯ ПРОГРАМНИХ АЛГЕБР КОМПОЗИЦІЙНОГО ТИПУ ТА ЇЇ ЗАСТОСУВАННЯ 3.84 MB
  Перераховані стилі виділяють певний (звичайно, дуже важливий, але один з багатьох) аспект та уточнюють саме його. Так, у структурному програмуванні це каталогізація методів побудови програм, у функціональному – опис програм системами функціональних рівнянь, у логічному – визначення програм специфікаціями певних формальних мов, як правило, першого порядку, в об‘єктно-орієнтованому (модульному) – трактування розмаїтості даних
39179. ФОРМИРОВАНИЕ ИНФОРМАЦИОННОЙ КОМПЕТЕНТНОСТИ ПЕДАГОГА В СИСТЕМЕ ПОВЫШЕНИЯ КВАЛИФИКАЦИИ 1.06 MB
  Другой проблемой на сегодняшний день является тот факт, что большинство педагогов российских школ сами имеют достаточно низкий уровень информационной компетентности. Особенно эта проблема актуальна для сельских школ и тех мест, где внедрение современных телекоммуникационных и информационных технологий только началось. Нередки ситуации, когда в школе уже появилась современная вычислительная техника, но используются она только в качестве печатной машинки с расширенными возможностями, так как учителя не обладают достаточными навыками и умениями для того, чтобы использовать эту технику в образовательном процессе.