Помогите пожалуйста!, две задачки.... Опции

[поф......]

Привет всем. Помогите пожалуйста решить две задачки....совсем не дается этот язык, а сдавать нужно...

3. построить график функции y=sqwrt(x) на отрезке от -2 до 2
Построить координатную сетку и оси
использовать собственные функции для смены системы координат

4. Построить изображение одуванчика
изобразить одуванчик
Количество тычинок сделать равным 22
Сделать рисунок симметричным

[renesko1]

Построить изображение одуванчика
изобразить одуванчик
Количество тычинок сделать равным 22
Сделать рисунок симметричны
В принципе, берешь круг = 6. 3 радиан ,кажется, делишь его на 22, тем самым определив угол между 2 тычинками(stepAlfa)
и используешь следующий цикл

for i := 1 to 22 do 
  begin
  x := round(x0 + cos ( alfa ) * cer ) ;
  y := round(y0 + sin ( alfa ) * cer ) ;
  alfa := alfa + stepAlfa ;
  line(x0, y0, x, y);
  end ;

где Х0 и У0 центр экрана .
Alfa угол который в цикле меняется на "угол между 2 тычинками".
cer рвстояние от центра.
к получившимся точкам сразу же рисуешь линии из центра : line(x0, y0, x, y);

Добавлено через 14 мин.
"использовать собственные функции для смены системы координат"
В смысле ?

Сообщение отредактировано: renesko1 - 18.04.2008 0:27

[renesko1]

Если хочешь что б ось симетрии была сторого вертикально то попробуй перед циклом подставлять разные значения alfa.