Question

Очень срочно) нужно составить программу на языке Basic. Помогите, пожалуйста) задания в прикрепленных файлах)

Answer 1

Вот сам программный код. Назначишь его кнопке на форме.
Dim e As Double
Dim l As Double
Dim dn As Double
Dim dv As Double
Dim c As Double
Dim otv As String
e = 4.7
dn = 0.5
dv = 0.4
For l = 1 To 3
c = (0.241 * e * l + 0.08 * dn) / Log(dn / dv) * Log(10)
otv = otv & Chr(13) & "l=" & l & " C=" & c
Next l
MsgBox otv

Dim x As Double
Dim y As Double
x = InputBox("Введите х")
If x < 0 Then
    y = -x
    Else:   
       If x > 1 Then
          y = x ^ 2 - Sin(pi * x ^ 2)
          Else: y = x ^ 2 - x
          End If
    End If
MsgBox y

Answer 2

спасибо))

Answer 3

Переименуйте файл из вложения в Form1.frm и вставьте в проект VB

fcc151728bad67df58a9db1dddeac3f0.txt

Answer 4

спасибо большое!