График астроиды, Тут где-то ошибка Опции

[Anastacia Adesso]

Скажите, пожалуйста, почему эта программа рисует точку примерно в центре..
По идее, мне нужна астроида
Аргумент a в функции x=a*sin^3(t) y=a*cos^3(t) вводится пользователем. И надо сделать так чтобы астроида помещалась в экран, независимо от этой a..

[volvo]

Скажите, пожалуйста, почему эта программа рисует точку примерно в центре..

Потому, что здесь:

for i:=1 to 100 do begin
  putpixel(gx(x,sx), gy(y,sy), blue);
end;

У тебя 100 раз в цикле строится одна точка. Ее координаты от i не зависят (в твоей реализации)...

По идее, мне нужна астроида

Вот тут можешь глянуть, как строятся графики параметрически заданных функций:
FAQ: Построение кривых 3-го и 4-го порядка, (заданных параметрически)

[Anastacia Adesso]

Volvo, я там уже смотрела много раз! Ничего хорошего не нашла, а только запуталась...

Может мне надо куда-то эту процедуру поставить а то она нигде не включена?

[volvo]

Ну, а если так:
 __ASTR.PAS ( 723 байт ) Кол-во скачиваний: 811

?

(проверялось при a = 5)

[Anastacia Adesso]

Здорово!!!
Спасибо огромное!!
Теперь держите кулачки за меня, чтоб препод не разорвал меня!!!