11 (2) (1106787)

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

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

Option Strict On

Imports System.IO

Module Module1

Dim k1 As Double = 0.05

Dim k2 As Double = 0.0065

Dim A0 As Double = 1

Function Pt(ByVal t As Double, ByVal P As Double) As Double

Return Math.Exp(-k1 * t) * k1 * A0 - k2 * P

End Function

Sub Main()

Dim out As StreamWriter

out = New StreamWriter("11.csv")

out.WriteLine(" <t>; <[P]>")

Dim t, P As Double

Dim t0 As Double = 0

Dim P0 As Double = 0

Dim tk As Double = 500

Dim h As Double = 10

Dim dt As Integer = CInt((tk - t0) / h)

Console.WriteLine(" Расчёт методом Эйлера кинетики хим. реакции")

Console.WriteLine()

Console.WriteLine(" Начальное значение t; {0}", t0)

Console.WriteLine(" Начальное значение P; {0}", P0)

Console.WriteLine(" Конечное значение t; {0}", tk)

Console.WriteLine(" Шаг интегрирования; {0}", h)

Console.WriteLine()

Console.WriteLine(" t; [P]")

For i As Integer = 0 To dt

Console.WriteLine(" {0,6}; {1}", t, P)

out.WriteLine(" {0,6}; {1}", t, P)

P = P + h * Pt(t, P)

t = t + h

Next i

out.Close()

Console.ReadLine()

End Sub

End Module

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

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

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

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

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

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