Важная информация
Показано с 1 по 4 из 4

Тема: Задачки.Нарисовать шарики и фигуры людей

  1. #1 Задачки.Нарисовать шарики и фигуры людей 
    Новичок
    Регистрация
    19.11.2011
    Сообщений
    2
    Сказал(а) спасибо
    2
    Поблагодарили 0 раз(а) в 0 сообщениях
    Дали такие задачки по Qbasic. Помогите с решением
    1)В магазине R красных, B синих, и Y желтых шариков.Значения вводятся с клавиатуры.Нарисовать эти шарики.
    2)В классе k человек.M мальчиков. Нарисовать этих мальчиков и девочек(подразумевается Мальчик- сверху круг снизу треугольник вершиной вверх.Девочка-круг и треугольник вниз)
    Ответить с цитированием  
     

  2. #2  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Задача 1
    Как-то так, наверное, не могу сейчас проверить правильность
    Код :
    CLS
    SCREEN 7
    INPUT R, B, Y
    FOR i = 0 TO R 
    CIRCLE (2, 2+i*2), 1 , 12
    PAINT (2, 2+i*2), 12, 12
    NEXT i
    FOR i = 0 TO B 
     CIRCLE (4, 2+i*2), 1 , 1
    PAINT (4, 2+i*2), 1, 1
    NEXT i
    FOR i = 0 TO Y 
     CIRCLE (6, 2+i*2), 1 ,14
    PAINT (6,  2+i*2), 14, 14
    NEXT i
    Последний раз редактировалось Кертис; 20.11.2011 в 01:29.
    Ответить с цитированием  
     

  3. Пользователь сказал cпасибо:

    ShadyRover (20.11.2011)

  4. #3  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Задача 2 по сути аналогичная, только надо херануть треугольник линиями по трем точкам. Линия рисуется командой:
    Код :
    LINE (x1, y1)-(x2, y2), q
    Где х,у это координаты, а q - код цвета.
    Домашнее задание вам - переделать задачу 1 под свое условие.
    Ответить с цитированием  
     

  5. Пользователь сказал cпасибо:

    ShadyRover (20.11.2011)

  6. #4  
    Новичок
    Регистрация
    19.11.2011
    Сообщений
    2
    Сказал(а) спасибо
    2
    Поблагодарили 0 раз(а) в 0 сообщениях
    Спасибо ребят
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Помогите нарисовать рисунок.
    от Дмитрий 1993 в разделе QBasic
    Ответов: 3
    Последнее сообщение: 14.12.2011, 04:58
  2. Помогите нарисовать рисунок в QBasic
    от Дмитрий 1993 в разделе QBasic
    Ответов: 11
    Последнее сообщение: 05.12.2011, 20:31
  3. Ответов: 7
    Последнее сообщение: 01.12.2011, 20:58
  4. Ответов: 0
    Последнее сообщение: 30.11.2011, 20:37
  5. Нарисовать рисунок
    от Luydvig в разделе QBasic
    Ответов: 6
    Последнее сообщение: 25.05.2011, 16:42
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •