Вопрос задан 15.06.2023 в 23:29. Предмет Информатика. Спрашивает Босякова Масяня.

Мне нужны координаты для грузовичка в QBASIC. СРОЧНО!!!!!!!!!!!! Я в 5 классе.

0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Гуленко Олександра.

Ответ: через оператор prest

Объяснение:

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно! Я могу помочь вам с кодом QBASIC для перемещения грузовика. Вот пример кода, который позволяет управлять грузовиком с помощью стрелочек на клавиатуре:

basic
SCREEN 12 ' Устанавливаем графический режим экрана DIM SHARED x, y ' Определяем глобальные переменные для координат грузовика x = 320 ' Начальная координата X y = 240 ' Начальная координата Y DO CLS ' Очищаем экран ' Рисуем грузовик на текущих координатах CIRCLE (x, y), 20 LINE (x - 20, y - 10)-(x + 20, y - 10) LINE (x - 20, y + 10)-(x + 20, y + 10) ' Считываем нажатия клавиш DO WHILE INKEY$ <> "" LOOP key$ = INKEY$ ' Обрабатываем нажатия стрелок IF key$ = CHR$(0) + CHR$(75) THEN x = x - 10 ' Стрелка влево IF key$ = CHR$(0) + CHR$(77) THEN x = x + 10 ' Стрелка вправо IF key$ = CHR$(0) + CHR$(72) THEN y = y - 10 ' Стрелка вверх IF key$ = CHR$(0) + CHR$(80) THEN y = y + 10 ' Стрелка вниз ' Проверяем границы экрана IF x < 20 THEN x = 20 IF x > 620 THEN x = 620 IF y < 20 THEN y = 20 IF y > 460 THEN y = 460 LOOP UNTIL INKEY$ = CHR$(27) ' Выход при нажатии клавиши ESC

В этом примере грузовик представлен кругом с двумя линиями вверху и внизу. Вы можете использовать стрелки на клавиатуре для перемещения грузовика по экрану. Границы экрана установлены от 20 до 620 по оси X и от 20 до 460 по оси Y.

Надеюсь, это поможет вам в вашем проекте! Если у вас возникнут еще вопросы, не стесняйтесь задавать.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос