Prosta Sinusoida w pascalu, jak?

ma ktoś pomysł jak to napisać?? chodzi mi o prosta sinusoidę pisana w Pascalu

ale co? Narysować sinusoidę w trybie graficznym?

W Google znalazłem: http://4programmers.net/Turbo_Pascal/Po … ia_grafiki

Paker na Forum używamy polskich znaków w pisowni, proszę poprawić wiadomość używając opcji Zmień

ma byc z gwiazdek, nie musi byc linia

clrsrc

pętla pozycjaX (real) od 1 do 80 co 1, a w niej

  • pozycjaY (real) = (sin(pozycjaX / 20) * 10) + 11

  • gotoXY(pozycjaX, pozycjaY)

  • write(’*’)