Visual Basic

ПР. Проект «Високосный год».

1.   Запустите MS Visual Studio.

2.   Создайте новый проект.

3.   Поместите на форму:

4.   Код.

Public Class Form1

  Dim year As Integer

  Dim result As String   Private Sub Button1_Click …    year = Val(TextBox1.Text)

   If (((year Mod 4) = 0) And ((year Mod 100) > 0)) Or ((year Mod 400) = 0) Then       result = "Високосный год"    Else

      result = "Невисокосный год"

   End If

      Label2.Text = result

  End Sub

End Class

5.   Запустите проект.   

6.   Сохраните в папке «Мои программы».