Отправляет email-рассылки с помощью сервиса Sendsay

Дистанционное обучение

  Все выпуски  

Уроки и методика преподавания информатики для учителей полярная система координат в паскале www.thl.narod.ru


Полярная система координат. Положение точки, заданное в полярных координатах, определяется длинной полярного радиуса (RO) и ивеличиной полярного угла (Fi). Ro=f(fi); От этой зависимости можно перейти к определению декартовых координат: X=Ro*COS(fi); Y=Ro*SIN(fi); Задача: построить архимедову спираль Ro=f(a*fi). Данные для ввода: а=3, fimin=0, fimax=50. program polarn; uses crt,graph; function ro(a,fi:real):real; begin ro:=a*fi;задаем функцию end; function p1(ro,fi:real):real; begin p1:=ro*cos(fi);находим x end; function p2(ro,fi:real):real; begin p2:=ro*sin(fi);находим y end; var i,x,y,r:real; fimax,fimin,a,b:word; c,d:integer; begin clrscr; writeln('введите а'); readln(a); writeln('введите минимальное значение fi'); readln(fimin); writeln('введите максимальное значение fi'); readln(fimax); initgraph(c,d,''); i:=fimin; while i

В избранное