Документ Microsoft Office Word (3) (1106809)

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

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

Option Strict On

Imports System.IO

Module Module1

Function F(ByVal x As Double) As Double

F = -2 * Math.Exp(-x) * (1 - Math.Exp(-x))

End Function

Sub Main()

Dim out As StreamWriter = New StreamWriter("results.csv")

Dim t, dt, tmin, tmax, x, u, t1, t2, n As Double

tmin = 0 : tmax = 30

Console.Write("Введите шаг по времени:")

'dt = 0.001

dt = Double.Parse(Console.ReadLine)

Console.Write("Введите начальное значение кординаты:")

x = Double.Parse(Console.ReadLine)

t = tmin : u = 0

out.WriteLine("t; x(t); u(t)")

out.WriteLine("{0}; {1}; {2}", t, x, u)

For i As Integer = 1 To CInt((tmax - tmin) / dt)

u = u + F(x) * dt

x = x + dt * (u - F(x) * dt)

t = t + dt

If n = 0 Then

If u * (u + F(x) * dt) < 0 Then

t1 = t

n = n + 1

End If

End If

'If CBool(u > 0) And CBool(u + F(x) * dt < 0) Then

't1 = t

'End If

'If CBool(u < 0) And CBool(u + F(x) * dt > 0) Cbool(n = 0) Then

' t2 = t

' End If

out.WriteLine("{0}; {1}; {2}", t, x, u)

Next

Console.WriteLine("Период колебаний = {0:F5}", Math.Abs((t1) * 2))

out.Close()

Console.ReadLine()

End Sub

End Module

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

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

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

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

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

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