Реферат: Использование языка программирования Visual Basic для решения математических задач

rn = r * RND

xc = x2 + rn * .5 * COS(a)

yc = y2 + rn * 1 * SIN(a)

PSET (xc, yc), 9 + 9 * RND

PRESET (x(i), y(i))

NEXT

END

Приложение 2

VERSION 5.00

Begin VB.Form Form1

BackColor = &H8000000D&

BorderStyle = 1 ‘Fixed Single

Caption = “Form1”

ClientHeight = 7770

ClientLeft = 45

ClientTop = 435

ClientWidth = 8670

FillColor = &H00C0FFFF&

LinkTopic = “Form1”

MaxButton = 0 ‘False

MinButton = 0 ‘False

ScaleHeight = 7770

ScaleWidth = 8670

StartUpPosition = 3 ‘Windows Default

Begin VB.CommandButton Command1

Caption = “Пуск”

Height = 495

Left = 720

TabIndex = 2

Top = 5280