Найди эксперта для помощи в учебе
Найти эксперта
+2
Пример заказа на Автор24
Студенческая работа на тему:
Информатика, язык программирования - Бэйсик, 1 курс, онлайн-помощь на экзамене, время решения - 2 часа,
Создан заказ №1288910
20 июня 2016

Информатика, язык программирования - Бэйсик, 1 курс, онлайн-помощь на экзамене, время решения - 2 часа,

Как заказчик описал требования к работе:
Время экзамена 01.07.16 10:00 утра по московскому времени, время экзамена - 2 часа, экзамен может начаться позже, но продлится также 2 часа. Прикрепил пример билетов. (Пример выполнения второго билета, возможно не полностью верный) 1) Private Sub Moshnost(ByVal I As Double, ByVal R As Double, ByRe f P As Double) P = I * I * R End Sub 2) Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim R1, R2, R3, P1, P2, P3, I1, I2, I3 As Double I1 = vvod(TextBox1) R1 = vvod(TextBox2) I2 = vvod(TextBox3) R2 = vvod(TextBox4) I3 = vvod(TextBox5) R3 = vvod(TextBox6) Moshnost(I1, R1, P1) Moshnost(I2, R2, P2) Moshnost(I3, R3, P3) vivodDbl1(P1, TextBox7) vivodDbl1(P2, TextBox8) vivodDbl1(P3, TextBox9) End Sub это первый номер 1) Private Sub DDD(ByVal x As Double, d As Double) If x > 2 Then d = (Log(x)) ^ 2 If d > Sin(x) Then d = Sin(x) If d > Cos(2 * x ^ 3) Then d = Cos(2 * x ^ 3) ElseIf x (Abs(x)) ^ (1 / 2) Then d = Sin(Sin(x)) ^ 3 Else d = (Abs(x)) ^ (1 / 2) End If If d < Tan(x) Then d = Tan(x) If d < E ^ (-2 * x) Then d = E ^ (-2 * x) Else d = Sin(x - 1) End If End Sub 2) Private Function YYY(ByVal y As Double, ByVal d As Double) As Double If d > 0 Then YYY = d * y Else YYY = y End If End Function 3) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x, y, d, h As Double x = vvod(TextBox1) y = vvod(TextBox2) h = vvod(TextBox3) Do While x 0 Then sum = sum + A(i) End If Next Summa = sum End Function 2) Private Sub New(ByRef NewMas() As Double, ByVal A() As Double, ByVal n1 As Integer, ByRef n2 As Integer, ByVal sum As Double) Dim i As Integer n2 = 0 For i = 0 To n1 - 1 If sum < A(i) Then ReDim Preserve NewMas(n2) NewMas(n2) = A(i) n2 = n2 + 1 End If Next End Sub 3) Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim A(), B() As Double Dim n1, n2 As Integer vvod(A, n1) PrintL(A, ListBox1) NewM(B, A, n1, n2, Summa(A, n1)) PrintL(B, ListBox2) End Sub это третье 1) Private Function KA(ByVal s As String) As Boolean Dim n, i As Integer Dim smax, a() As String KA = False a = Split(s) n = 0 For i = 1 To UBound(a) If Len(a(i)) > n Then n = Len(a(i)) : smax = a(i) Next For i = 1 To n - 2 If Mid(smax, i, 2) = "КА" Then KA = True : Exit Function Next End Function 2) Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim s As String s = TextBox1.Text If KA(s) = True Then TextBox2.text = "Слово КА в самом длинном слове строки есть" Else TextBox2.text = "Слова КА в самом длинном слове строки нет" End If End Sub это четверто
подробнее
Заказчик
заплатил
200 ₽
Заказчик не использовал рассрочку
Гарантия сервиса
Автор24
20 дней
Заказчик принял работу без использования гарантии
23 июня 2016
Заказ завершен, заказчик получил финальный файл с работой
5
Заказ выполнил
ша_елена
5
скачать
Информатика, язык программирования - Бэйсик, 1 курс, онлайн-помощь на экзамене, время решения - 2 часа,.docx
2019-04-17 13:00
Последний отзыв студента о бирже Автор24
Общая оценка
5
Положительно
Все замечательно, с заданием автор справился в срок, выполнив все задачи которые были перед ним поставлены.

Хочешь такую же работу?

Оставляя свои контактные данные и нажимая «Создать задание», я соглашаюсь пройти процедуру регистрации на Платформе, принимаю условия Пользовательского соглашения и Политики конфиденциальности в целях заключения соглашения.
Хочешь написать работу самостоятельно?
Используй нейросеть
Мы создали собственный искусственный интеллект,
чтобы помочь тебе с учебой за пару минут 👇
Использовать нейросеть
Тебя также могут заинтересовать
История программирования в лицах
Реферат
Информатика
Стоимость:
300 ₽
Мануэль Кастельс Галактика Интернет
Эссе
Информатика
Стоимость:
300 ₽
Выполнить учебную практику по Операционные системы и среды.М-02407
Отчёт по практике
Информатика
Стоимость:
700 ₽
Программирование алгоритмов сортировки массивов.
Лабораторная работа
Информатика
Стоимость:
300 ₽
Выполнить курсовую работу по Информатике. К-00165
Курсовая работа
Информатика
Стоимость:
700 ₽
Анализ и структуры экономических ресурсов Интернет
Курсовая работа
Информатика
Стоимость:
700 ₽
Применение информационных технологий в образовании
Реферат
Информатика
Стоимость:
300 ₽
2 контрольные работы по информационным системам
Контрольная работа
Информатика
Стоимость:
300 ₽
Оценка корреляционных свойств C/A кода в системе NavStar
Курсовая работа
Информатика
Стоимость:
700 ₽
Сделать контрольную по exel онлайн. в среду 16.11. 2022. С 13:00 (мск)
Помощь on-line
Информатика
Стоимость:
700 ₽
Нужен тот, кто владеет Excel,Word,Power point.
Помощь on-line
Информатика
Стоимость:
700 ₽
Тест по информатике (тест за 8-11 класс) 20 марта с 10:00 до 11:00
Помощь on-line
Информатика
Стоимость:
700 ₽
Вступительный экзамен по информатике, онлайн помощь.
Помощь on-line
Информатика
Стоимость:
700 ₽
Итоговый онлайн тест по информационным технологиям
Помощь on-line
Информатика
Стоимость:
700 ₽
Читай полезные статьи в нашем
Простые структуры информации
К простым структурам информации относятся:
Самой простейшей структурой является множество, то есть, некоторый набор элементов. Чтобы определить множество, необходимо перечислить все его элементы или описать и определить характерный признак элементов множества.
Множество может состоять из конечного числа элементов (например, алфавит), бесконечного числа элементов (например, множество чисел) или вообщ...
подробнее
Назначение и возможности Microsoft Excel
Электронные таблицы Microsoft Excel созданы для обеспечения удобства работы пользователя с таблицами данных, которые преимущественно содержат числовые значения.
С помощью электронных таблиц можно получать точные результаты без выполнения ручных расчётов, к тому же встроенные функции позволяют быстрее решать достаточно сложные задачи.
В прямоугольных таблицах часто хранят упорядоченные данные и испол...
подробнее
Ячейка электронной таблицы MS Excel
Ячейки образуются на пересечении столбцов и строк электронной таблицы. Каждая ячейка имеет имя, которое состоит из названия столбца и номера строки (например, В7, Е34, H13).
Диапазоном (блоком, интервалом) ячеек называется прямоугольная область в таблице, которая включает несколько выделенных ячеек. Адрес диапазона обозначается именами первой и последней выделенной ячейки, которые разделяются двоет...
подробнее
Основные возможности MS PowerPoint
Программа позволяет разрабатывать электронные документы, которые отличаются комплексным мультимедийным содержанием и особыми возможностями воспроизведения:
Как известно, при использовании на слайдах презентации видео- и звуковых эффектов человек способен запомнить 90% информации.
Для придания презентациям интерактивности используют гиперссылки, которые могут ссылаться как на объекты внутри файла, та...
подробнее
Простые структуры информации
К простым структурам информации относятся:
Самой простейшей структурой является множество, то есть, некоторый набор элементов. Чтобы определить множество, необходимо перечислить все его элементы или описать и определить характерный признак элементов множества.
Множество может состоять из конечного числа элементов (например, алфавит), бесконечного числа элементов (например, множество чисел) или вообщ...
подробнее
Назначение и возможности Microsoft Excel
Электронные таблицы Microsoft Excel созданы для обеспечения удобства работы пользователя с таблицами данных, которые преимущественно содержат числовые значения.
С помощью электронных таблиц можно получать точные результаты без выполнения ручных расчётов, к тому же встроенные функции позволяют быстрее решать достаточно сложные задачи.
В прямоугольных таблицах часто хранят упорядоченные данные и испол...
подробнее
Ячейка электронной таблицы MS Excel
Ячейки образуются на пересечении столбцов и строк электронной таблицы. Каждая ячейка имеет имя, которое состоит из названия столбца и номера строки (например, В7, Е34, H13).
Диапазоном (блоком, интервалом) ячеек называется прямоугольная область в таблице, которая включает несколько выделенных ячеек. Адрес диапазона обозначается именами первой и последней выделенной ячейки, которые разделяются двоет...
подробнее
Основные возможности MS PowerPoint
Программа позволяет разрабатывать электронные документы, которые отличаются комплексным мультимедийным содержанием и особыми возможностями воспроизведения:
Как известно, при использовании на слайдах презентации видео- и звуковых эффектов человек способен запомнить 90% информации.
Для придания презентациям интерактивности используют гиперссылки, которые могут ссылаться как на объекты внутри файла, та...
подробнее
Теперь вам доступен полный отрывок из работы
Также на e-mail вы получите информацию о подробном расчете стоимости аналогичной работы