Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите решить простую задачку поQBasic / 3 сообщений из 3, страница 1 из 1
28.12.2005, 19:17
    #33462998
Тусик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите решить простую задачку поQBasic
Товарищи!!!
Скажите, пожалуйста, как проверяется деление на число в QBasice.
Например, числа, которые делятся на 2.
Заранее благодрана всем, кто отклинется.
...
Рейтинг: 0 / 0
28.12.2005, 19:18
    #33463000
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите решить простую задачку поQBasic
if (a mod 2) = 0 then
......
...
Рейтинг: 0 / 0
05.01.2006, 13:57
    #33469144
Qurty
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите решить простую задачку поQBasic
Осуществить вывод на экран средствами BIOS: вывести точки на экран цветом согласно варианту, попробовать вывести прямую или любую простую геометрическую фигуру.

.model small

.stack 100h

.code

.186

start:

push FAR_BSS

pop ds

xor ax,ax

int 1Ah



mov di,320*200+1

fill_buffer:

imul dx,4E35h

inc dx

mov ax,dx

shr ax,15

mov byte ptr [di],al
dec di

jnz fill_buffer

mov ax,0013h

int 10h

mov si,320*200+1

mov cx,319

mov dx,199

outdisplay:

mov al,byte ptr [si]

mov ah,0Ch
int 10h

dec si

dec cx

jns outdisplay

mov cx,319

dec dx
jns outdisplay
mov ah,08h
int 21h

mov ax,0003h
int 10h

mov ax,4C00h
int 21h

.fardata?
db 320*200+1 dup(?) end start
...
Рейтинг: 0 / 0
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите решить простую задачку поQBasic / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]