|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.06.2010, 15:37 | #1 |
Пользователь
Регистрация: 10.06.2010
Сообщений: 11
|
Как осуществить изображение пирамидки
нужно на канве image изобразить пирамидку ,которая имеет n прямоугольных дисков, самый меньший прямоугольник меньше самого большого в m раз, n и m задаются пользователем
как задать координаты подскажите пожалуйста)) |
10.06.2010, 15:43 | #2 | |
Форумчанин
Регистрация: 30.04.2010
Сообщений: 317
|
Цитата:
Код:
x1,y1- правый нижний угол прямоугольника
icq:627719[сто сорок четыре] - помогу с Pascal & Delphi!
|
|
10.06.2010, 15:46 | #3 |
Пользователь
Регистрация: 10.06.2010
Сообщений: 11
|
ну это понятно, интересно знать, какими они должны быть если учитывать n и m и условие
|
10.06.2010, 15:50 | #4 |
Форумчанин
Регистрация: 30.04.2010
Сообщений: 317
|
L--длина большого(ПЕРВОГО)
LL=L div m-- длина малого(ПОСЛЕДНЕГО) dx=(L-LL) DIV N -- величина уменьшения длины с каждой итерацией h--высота прямоугольников вот и координаты) x[n]:=x[n-1]+dx div 2; y[n]:=y[n-1]+h; x1[n]:=x1[n-1]-dx div 2; y1[n]:=y1[n-1]+h;
icq:627719[сто сорок четыре] - помогу с Pascal & Delphi!
Последний раз редактировалось DoDge_VipeR; 10.06.2010 в 15:54. |
10.06.2010, 16:11 | #5 |
Пользователь
Регистрация: 10.06.2010
Сообщений: 11
|
Спасибо)
________ |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как осуществить поиск в диапазон? | Simbad | Microsoft Office Word | 4 | 25.03.2010 12:09 |
как осуществить такую логику | mortira | Общие вопросы Delphi | 27 | 29.06.2009 18:15 |
Как осуществить запоминание объектов? | Djem1991 | Общие вопросы Delphi | 4 | 06.01.2009 14:09 |
Как осуществить доступ к полю? | Чайник87 | Помощь студентам | 2 | 13.10.2008 23:11 |