Question

С помощью каких команд можно сделать смайлик в программе QBASIC

Answer 1

CLS
SCREEN 12
CIRCLE (320,200),100,14
PAINT (320,240),14
CIRCLE (280,200),20,3
PAINT (280,200),3
CIRCLE (360,200),20,3
PAINT (360,200),3
CIRCLE (320,240),40,0, 3.14
LINE (260,180)-(300,160),0
LINE (340,160)-(380,180),0 просто)

Answer 2

В QBASIC вы можете нарисовать смайлик с помощью графических команд. Вот пример кода, который рисует смайлик:

scssCopy code
SCREEN 12
CIRCLE (200,150),80,14
CIRCLE (160,120),10,0
CIRCLE (240,120),10,0
CIRCLE (160,120),3,0
CIRCLE (240,120),3,0
LINE (160,180)-(240,180),0

Этот код создает желтый круг (лицо) с черными глазами и ртом. Чтобы использовать этот код, сохраните его в файл с расширением ".BAS" и запустите его в QBASIC.