Поиск
 
Найдено: 2
Область поиска: теги — integer [x]

Обработка экономической информации средствами языка Pascal

... режим работы графического адаптера; Процедуры и функции модуля GRAPH ClearDevice — Очищает экран и помещает курсор в точку (0,0); SetViewPort (x1, y1, x2, y2: integer; Clip: boolean) — Устанавливает текущее окно для графического вывода. X1, y1 — координата верхнего левого угла; x2, y2 — координата нижнего ...

Игра на ловкость "Змейка"

... перезаписан. Код программы: Форма_Змейка '-------Описание переменных------Option Explicit Dim Змейка () As Змея Dim LastPos As Змея Dim Apple As Змея Dim Bomba As Змея Dim i, j, Длина As Integer Dim XDir, YDir As Integer Dim FirstXPos, FirstYPos As Integer Dim Проверочная1 As Byte Dim Проверочная2 As Single Dim НЛ As String '-------Начальные присвоения-------Const TIC = 1 'Период таймера ...