1. Ввод-вывод информации, с использованием файлов. Форматирование значений данных 2. Управляющие операторы безусловного и условного переходов. Разветвляющие программы

Контрольная работа

9 страниц

4 источника

Добавлена 28.07.2023

590 ₽

1180 ₽

Скачать превью

Фрагмент для ознакомления 1

ЛАБОРАТОРНАЯ РАБОТА №2
Ввод-вывод информации, с использованием файлов. Форматирование значений данных.

Задание. Составить процедуру для вычисления и печати значений функции
Вычислить 8 значений функции на заданном интервале [-1,5.. 3.5]. Исходные данные задать в файле Dat2.txt. Ре- 49 зультат поместить в файл вывода с именем Res2.txt в заданной форме

ЛАБОРАТОРНАЯ РАБОТА №3
Управляющие операторы безусловного и условного переходов. Разветвляющие программы
Задание 1. Вычислить для своего варианта значение функции по соответствующим еѐ выражениям. При получении в знаменателе нуля дать соответствующее сообщение
Задание 2. Определить для своего варианта номер N области, в которой находиться точка М(x,y) c заданными координатами. Границы области относить к области с наибольшим номером.

Фрагмент для ознакомления 2

ЛАБОРАТОРНАЯ РАБОТА №2
Ввод-вывод информации, с использованием файлов. Форматирование значений данных.

Задание. Составить процедуру для вычисления и печати значений функции
Вычислить 8 значений функции на заданном интервале [-1,5.. 3.5]. Исходные данные задать в файле Dat2.txt. Ре- 49 зультат поместить в файл вывода с именем Res2.txt в заданной форме
Ход выполнения работы:
Sub Макрос1()
Dim X, Y As Single
Open "C:\VBA\dat2.txt" For Input As #1
Open "C:\VBA\res2.txt" For Output As #2
Print #2, Tab(10); "*************************************"
10 Input #1, X
If EOF(1) Then GoTo 99
Y = Log(8) - 5 * X ^ 4 + 3.14 * X ^ 5
Print #2, Tab(10); "* x= "; Spc(3); Format(X, "##.0##"); _
Tab(30); " * y= "; Spc(3); Format(Y, "##.0##"); " * ";
GoTo 10
99
Y = Log(8) - 5 * X ^ 4 + 3.14 * X ^ 5
Print #2, Tab(10); "* x= "; Spc(3); Format(X, "##.0##"); _
Tab(30); " * y= "; Spc(3); Format(Y, "##.0##"); " * ";
Print #2, Tab(10); "*************************************"
Print #2, Tab(10); "Составил: "
Close #1
Close #2
End Sub

Файл dat2.txt
-1.5
-0.875
-0.25
0.375
1
1.625
2.25
2.875
3.5

Файл Res2.txt:

Фрагмент для ознакомления 3

1. Архипов В.Н., Калядин В.И., Любин А.Н., Макаров А.И. Программирование на фортране:методические указания к лабораторным работам. - М.;МГТУ «МАМИ», 2007., -144с.
2. Гарнаев А. Самоучитель VBA технология создания пользовательских приложений. - М. BHV, 2006., – 153с.
3. Калядин В.И., Макаров А.И. основы работы на персональном компьютере: сборник лабораторных работ. - М.;МГТУ «МАМИ», 2010., -85с.
4. Кузьменко В.Г. VBA эффективное использование М. БИНОМ 2009., -617с.

Узнать стоимость работы

Дипломная работа

от 6000 рублей/ 3-21 дня/ от 6000 рублей/ 3-21 дня

Узнать стоимость
Курсовая работа

1600/ от 1600 рублей / 1-7 дней

Узнать стоимость
Реферат

600/ от 600 рублей/ 1-7 дней

Узнать стоимость
Контрольная работа

250/ от 250 рублей/ 1-7 дней

Узнать стоимость
Решение задач

250/ от 250 рублей/ 1-7 дней

Узнать стоимость
Бизнес план

2400/ от 2400 руб.

Узнать стоимость
Аспирантский реферат

5000/ от 5000 рублей/ 2-10 дней

Узнать стоимость
Эссе

600/ от 600 рублей/ 1-7 дней

Узнать стоимость