урок информатики в 11 классе.

 

1. Задание.

Используя графические возможности языка программирования, напишите программу, которая имитирует какое-либо явление природы. Например, идёт дождь.

 

Программный код проекта "Движение закрашенного круга".

Private Sub Комманда1_Click()

Scale (10, -10)-(-10, 10)

For x = -10 To 10

FillColor = 200
Circle (0, x), 1, 200

'задержка стирания
For i = 1 To 1000000
Next i

FillColor = vbWhite
Circle (0, x), 1, vbWhite 
Next x

End Sub

 

2. Сколько окружностей будет изображено на форме?

 

Private Sub Комманда1_Click()

Scale (0, 0)-(11, 6) ... Читать дальше »