Брошюры-рекомендации
РОСОБРНАДЗОР ФИПИ Федеральный центр тестирования МинобрНауки Российское образование ГИА ЕГЭ Образовательные ресурсы ФЦИОР Единое окно доступа ЦОР ФГОС
Главная | Мой профиль | Регистрация | Выход | Вход | RSS

Приветствую Вас Гость

Четверг, 19.07.2018, 02:36

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » Учебный раздел » 9 класс » информатика (кибернетика и др)
информатика
midschoolДата: Воскресенье, 14.02.2010, 20:52 | Сообщение # 1
Admin
Группа: Администраторы
Сообщений: 99
Репутация: 3
Статус: Offline
Тема "Информационные модели систем управления"
программа для создания системы управления
Public Class Form1
Dim x, y As Single
Dim g1 As Graphics
Dim pen1 As New Pen(Color.Red, 3)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
g1 = Me.PictureBox1.CreateGraphics
g1.ScaleTransform(1, -1)
g1.TranslateTransform(0, -300)
g1.DrawEllipse(pen1, 150, 150, 50, 50)
g1.DrawEllipse(Pens.Black, 10, 10, 2, 2)
End Sub

End Sub
End Class

 
midschoolДата: Воскресенье, 14.02.2010, 20:54 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 99
Репутация: 3
Статус: Offline
Для случайной установки точки:
randomize()
x=int(rnd()*300)
y=int(rnd()*300)
 
Форум » Учебный раздел » 9 класс » информатика (кибернетика и др)
  • Страница 1 из 1
  • 1
Поиск:


Статистика
Друзья сайта
  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • Инструкции для uCoz
  • Наш опрос
    Оцените мой сайт
    Всего ответов: 254
    Copyright MyCorp © 2018
    Создать бесплатный сайт с uCoz