Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Еще одна прога на QBasic! / 5 сообщений из 5, страница 1 из 1
15.05.2006, 15:50
    #33727737
evgsaymon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще одна прога на QBasic!
Не подумайте, что я решил спросить Вас решение всех задач по информатике ;) Эта задачка, надеюсь, последняя...

Необходимо написать программу, реализующую следующий рисунок:
...
Рейтинг: 0 / 0
16.05.2006, 00:05
    #33728671
evgsaymon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще одна прога на QBasic!
Ребят, ну помогите, плиз...

С уважением, Евгений
...
Рейтинг: 0 / 0
16.05.2006, 10:28
    #33729118
evgsaymon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще одна прога на QBasic!
Вот, написал я прогу:

CLS
SCREEN 7
COLOR 4
CIRCLE (90, 90), 20, 14, , , 2.3
PAINT (90, 90), 14
END


Помогите, плиз остальные эллипсы через цикл (или как-нить по-другому) вывести...

А то я сделал вот так:

CLS
SCREEN 7
COLOR 1
CIRCLE (90, 90), 22, 4, , , 2.3
CIRCLE (90, 90), 20, 14, , , 2.3
PAINT (90, 90), 14
CIRCLE (111, 90), 22, 4, , , 2.3
CIRCLE (111, 90), 20, 14, , , 2.3
PAINT (111, 90), 14
CIRCLE (131, 90), 22, 4, , , 2.3
CIRCLE (131, 90), 20, 14, , , 2.3
PAINT (131, 90), 14
CIRCLE (151, 90), 22, 4, , , 2.3
CIRCLE (151, 90), 20, 14, , , 2.3
PAINT (151, 90), 14
CIRCLE (171, 90), 22, 4, , , 2.3
CIRCLE (171, 90), 20, 14, , , 2.3
PAINT (171, 90), 14
CIRCLE (191, 90), 22, 4, , , 2.3
CIRCLE (191, 90), 20, 14, , , 2.3
PAINT (191, 90), 14
END


Но так мне не надо !
...
Рейтинг: 0 / 0
16.05.2006, 16:44
    #33730443
Flare
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще одна прога на QBasic!
Как раз тот случай, когда нужно дословно написать как сделать простейший цикл FOR...NEXT:
"Read This Fucking Manual"
...
Рейтинг: 0 / 0
16.05.2006, 17:39
    #33730639
evgsaymon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще одна прога на QBasic!
FlareКак раз тот случай, когда нужно дословно написать как сделать простейший цикл FOR...NEXT:
"Read This Fucking Manual"
Вот, сделал:
CLS
SCREEN 7
LINE (70, 30)-(210, 150), , B
FOR i = 90 TO 190 STEP 20
COLOR 1
CIRCLE (i, 90), 22, 4, , , 2.3
CIRCLE (i, 90), 20, 14, , , 2.3
PAINT (i, 90), 14
NEXT i
END

Можно сделать так, чтобы фон был белым, а стороны квадрата черными???
...
Рейтинг: 0 / 0
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Еще одна прога на QBasic! / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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