Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Тема: Процедуры и функции https://www.cyberforum.ru/ pascalabc/ thread720703.html Даны вещественные числа A и R, представляющие собой длину стороны квадрата и радиус круга на плоскости. Написать подпрограмму, выводящую одно из трех сообщений: "КРУГ ПОМЕЩАЕТСЯ В КВАДРАТ", "КВАДРАТ ПОМЕЩАЕТСЯ В КРУГ", "КРУГ И КВАДРАТ НЕ ПОМЕЩАЮТСЯ ДРУГ В ДРУГЕ", в зависимости от величин А и R. Желательно с блок-схемой	дано трёхзначное число узнать что оно заканчивается и начинается на одну и туже цифру Pascal ABC дано трёхзначное число узнать что оно заканчивается и начинается на одну и туже цифру
Pascal ABC ТЕМА: Циклы Вывести на дисплей календарь на текущий год. p.s: нужно еще блок-схема https://www.cyberforum.ru/ pascalabc/ thread720680.html	Pascal ABC массивы https://www.cyberforum.ru/ pascalabc/ thread720675.html подскажите пожалуйста как найти номера одинаковых элементов в массиве?????
Pascal ABC Ввести с клавиатуры целочисленную матрицу размерности n x m Ввести с клавиатуры целочисленную матрицу размерности n x m (заданы константами). Найти элемент кратный заданному числу. Вывести на экран найденный элемент, его индексы, степень кратности.	Pascal ABC В одномерном массиве, состоящем из п вещественных элементов, вычислить: В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1. Минимальный элемент массива. 2. Сумму элементов массива, расположенных между первым и последним положительными элементами. Преобразовать массив таким образом, чтобы сначала располагались все элементы, равные нулю, а потом - все остальные. https://www.cyberforum.ru/ pascalabc/ thread720668.html
Pascal ABC Линейный алгоритм. Ввод-вывод данных Вычислите значение выражений по формуле: https://www.cyberforum.ru/ pascalabc/ thread720658.html	Pascal ABC Вывести на экран массив. Найти среднее арифмитическое положительных элементов 2)Дан одномерный массив А(M). Вывести на экран массив. Найти среднее арифмитическое положительных элементовю Вывести результат на экран
Pascal ABC Лабораторная по типизированным файлам https://www.cyberforum.ru/ pascalabc/ thread720623.html Создать файл действительных чисел. Получить новый файл, компоненты которого являются отклонениями соответствующих компонент исходного файла от среднего арифметического значения всех его компонент. Что такое отклонение? Как это понять?	Pascal ABC Ввести файл F1, из положительных элементов которого сформировать другой файл F2 читая F1 от конца к началу https://www.cyberforum.ru/ pascalabc/ thread720613.html Ввести файл F1, из положительных элементов которого сформировать другой файл F2 читая F1 от конца к началу. Из этих файлов сформировать, соответственно, квадратные матрицы A1 n1×n1 и A2 n2×n2 максимально возможного размера записывая в них элементы построчно. В полученных матрицах поменять местами первую строку и главную диагональ. В процессе решения задачи выводить файлы и матрицы как до,...
Pascal ABC Даны целые числа m, a1,..., a20. Найти три натуральных числа i, j, k, каждое из которых не превосходит двадцати, такие, что ai+ aj+ ak = m. Даны целые числа m, a1,..., a20. Найти три натуральных числа i, j, k, каждое из которых не превосходит двадцати, такие, что ai+ aj+ ak = m. Если таких чисел нет, то сообщить об этом.	Pascal ABC Даны натуральные числа https://www.cyberforum.ru/ pascalabc/ thread720599.html Даны натуральные числа n, b0, ...,bn. Вычислить f(b0)+f(b1)+...+f(bn),где

leobrn

26 / 26 / 15

Регистрация: 20.10.2012

Сообщений: 180

Управление объектом с клавиатуры (задать движение) - Pascal ABC - Ответ 3808456

06.12.2012, 13:34. Показов 10264. Ответов 5

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

есть флаг, нужно сделать так, чтобы можно было управлять им с клавиатуры.
Код флага:

Pascal

program pr;
uses graphABC;
 
var
x,y:integer;
l,h:integer;
w:integer;
i:integer;
begin
x:=100;
y:=100;
l:=50;
h:=25;
w:=round(h/3);
SetBrushColor(clWhite); 
Rectangle(x,y,x+l,y+w); 
 
SetBrushColor(clBlue); 
Rectangle(x,y+w,x+l,y+2*w); 
 
SetBrushColor(clRed); 
Rectangle(x,y+2*w,x+l,y+3*w); 
 
 
 
readln;
end.

Добавлено через 16 часов 59 минут
помогитеееее

Вернуться к обсуждению:
Управление объектом с клавиатуры (задать движение) Pascal ABC

Следующий ответ

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #3811583

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

06.12.2012, 13:34

Готовые ответы и решения:

Управление объектом с клавиатуры
Добрый день пытаюсь сделать игру Астероид, и вот столкнулся с проблемой управления космическим...

Движение за объектом
Возник еще один вопрос.. Надеюсь, последний в этом разделе)) Есть блок слева(Heroy), а справа...

Движение камеры за объектом
Добрый день! Захотелось:) написать что-то похожое на гонки. Возник вопрос - как перемещать камеру...

Движение, вращение, управление движением, управление вращением фигуры
Написать программу, выполняющую четыре операции над графическим...

	06.12.2012, 13:34

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

06.12.2012, 13:34

Помогаю со студенческими работами здесь

Управление объектом в canvas
Graphics::TBitmap* gBitmap = new Graphics::TBitmap; gBitmap->LoadFromFile("0.bmp");...

Тач-управление объектом
Здравствуйте гуру У меня возникла проблема При движении пальца вверх или вниз по экрану...

Движение камеры вслед за объектом
Ребята привет. Есть скрипт движения камеры с помощью мышки по X Y Z + вращение, прям как в...

Управление объектом в экранных координатах
Здравствуйте , хочу узнать как можно выставить объект не в мировых координатах , а в экранных

Новые блоги и статьи
Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .	Полезные поделки на Arduino, которые можно сделать самому raxper 06.01.2025 Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .	Подборка решений задач на Python IT_Exp 06.01.2025 Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллеры raxper 06.01.2025 Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .	Из чего собрать игровой компьютер inter-admin 06.01.2025 Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .	Обновление сайта www.historian.by Reglage 05.01.2025 Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .	Как использовать GraphQL в C# с HotChocolate Programming 05.01.2025 GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .	Модель полного двоичного сумматора с помощью логических операций (python) AlexSky-coder 04.01.2025 def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()	Это мы не проходили, это нам не задавали...(асихронный счётчик с управляющим сигналом зад Hrethgir 04.01.2025 Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .

Наверх