Задача 6.2(1) (1107195)

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

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

Option Strict On

Module Module1

Function Cp(ByVal x As Double) As Double

Return 3 * Math.Log(x + 1) / (1 + Math.Log(x + 1))

End Function

Sub Main()

Dim a As String

Dim St, StInt, Ht, T1, T2, ii As Double

Console.Write("Введите шаг:")

a = Console.ReadLine

StInt = Double.Parse(a)

' StInt = 0.1

T1 = 0

T2 = 300

St = 50

Ht = 0

ii = 0

Console.WriteLine("Шаг интегрирования по t: {0:F2}", StInt)

Console.WriteLine()

Console.WriteLine(" T Cp H(T)")

Console.WriteLine("-----------------------------------")

For i = T1 + St To T2 Step St

If i = T1 + St Then Console.WriteLine("{0,5} {1,10} {2,10}", i - St, Cp(i - St), Ht * StInt)

Do

Ht = Ht + (Cp(ii) + Cp(ii + StInt)) / 2

ii = ii + StInt

Loop While ii <= i - StInt / 2

Console.WriteLine("{0,5} {1,10:F5} {2,10:F5}", i, Cp(i), Ht * StInt)

Next i

Console.ReadLine()

End Sub

End Module

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

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

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

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

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

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