Задача 6.1(2) (1107194)

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла

Option Strict On

Module Module1

Function P(ByVal s As Double, ByVal r As Double) As Double

Return Math.Exp(-0.0076 * s ^ 2) * Math.Sin(2.67 * s - 0.00004 * s ^ 3) * Math.Sin(s * r) / ((s ^ 2) * r)

End Function

Sub Main()

Dim h As Double = 0.2

Dim Sq As Double = 0

Dim Sqs As Double = 0

Console.WriteLine("Шаг интегрирования по s: {0:F}" & vbNewLine, h)

Console.WriteLine(" z F(z)" & vbNewLine & "----------------------------")

For r As Double = 2.2 To 3.0 Step 0.05

For s As Double = 10 ^ -10 To 30 Step h

Sq = h * (P(s, r) + P(s + h, r)) / 2

Sqs = Sqs + Sq

Next s

Console.WriteLine("{0,7:F2} {1,-13:F5}", r, Sqs)

Sq = 0

Sqs = 0

Next r

Console.ReadLine()

End Sub

End Module

Характеристики

Тип файла документ

Документы такого типа открываются такими программами, как Microsoft Office Word на компьютерах Windows, Apple Pages на компьютерах Mac, Open Office - бесплатная альтернатива на различных платформах, в том числе Linux. Наиболее простым и современным решением будут Google документы, так как открываются онлайн без скачивания прямо в браузере на любой платформе. Существуют российские качественные аналоги, например от Яндекса.

Будьте внимательны на мобильных устройствах, так как там используются упрощённый функционал даже в официальном приложении от Microsoft, поэтому для просмотра скачивайте PDF-версию. А если нужно редактировать файл, то используйте оригинальный файл.

Файлы такого типа обычно разбиты на страницы, а текст может быть форматированным (жирный, курсив, выбор шрифта, таблицы и т.п.), а также в него можно добавлять изображения. Формат идеально подходит для рефератов, докладов и РПЗ курсовых проектов, которые необходимо распечатать. Кстати перед печатью также сохраняйте файл в PDF, так как принтер может начудить со шрифтами.

Список файлов лабораторной работы