Задача 3 (1107183)

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

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

Option Strict On

Module Module1

Sub Main()

Dim W As Double = 0

Dim C As Double = 1

Dim T As Double = 10 ^ (-6)

Dim J As Double

Dim P As Double

Dim R As Double

Dim E, G As Double

Const A As Double = 1.381 * 10 ^ (-16)

Const B As Double = 1.986 * 10 ^ (-16)

Do While C < 1000

C = C * 10

Console.WriteLine()

Console.WriteLine("Частота колебания: {0} (см-1)", C)

Console.WriteLine()

Console.WriteLine("T | Fv | <Ev>/h (см-1)")

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

For F As Double = 100 To 2000 Step 100

R = 0

W = -1

J = 0

Do

W = W + 1

G = Math.Exp(-(W + 0.5) * C * B / (A * F))

R = R + G

E = ((W + 0.5) * B * C * G)

J = J + E

Loop While G > T

P = J / B / R

Console.WriteLine(" {0,-4:F0}| {1,-8:F4}| {2,-15:E8}", F, R, P)

Next F

Loop

Console.ReadLine()

End Sub

End Module

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

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

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

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

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

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