Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ] > Код на шару!
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.05.2013, 23:33
MadFatCat MadFatCat вне форума
Прохожий
 
Регистрация: 25.03.2013
Сообщения: 7
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Canvas

В четырех строках ввода (Edit) ввести координаты двух угловых вершин
прямоугольника, его стороны параллельны кроме формы. Генератором случайных чисел сгенерировать 1000 случайных точек. Те из них, которые попадут мимо прямоугольника, отображать синим цветом, те, что внутрь прямоугольника - лимонным, на границы прямоуголольника - красным. По окончании "обстрела" вывести в надписи (Label) сколько точек попало в прямоугольник, сколько на его границы, сколько не попало в прямоугольник.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 06:56.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter