Új hozzászólás Aktív témák

• #5675 pckownz őstag

  Új Válasz 2012-01-10 21:47:45 #5675

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  pckownz

  őstag

  2011. máj. emelt szakmai infó érettségi egyik feladata:
  Tennisz gép, kilövi a labdát szabadon állítható kezdő sebességgel és szöggel.

  Lazarusban próbáltam fokot használni, de sinus-hoz elvileg kell a radián. Átváltottam, viszont se fokkal se radiánnal nem kapok olyan eredményt, mint amit az MsCalc ad. Hol lesz a hiba? Már azt is megcsináltam, hogy a C -s megoldókulcsot átalakítottam, de még mindig nem egyezik a két eredmény. (double típusú változókat használok, kerekítés nélkül, beépített PI függvénnyel)

  Előszőr ilyen módszerrel átalakítottam a szöget radianra:
  function TForm1.Radian(angle:double):double;
  begin
  Radian:= angle * PI / 180;
  
  end;

  Ez nem jött be, jött a másik módszer, képletbe ágyazva alakítom át:
  tavmert:=(SQR(v0) * Sin(PI * 2 * alfa / 180) ) / g;
  Minden változó double, a g double konstans 9,81 értékkel. Sajnos bármilyen módszert próbáltam, nagyon eltérnek a programom eredményei az MsCalc által számoltaktól.

  Alapképlet:
  v0^2 * Sin(2alfa) /g

Új hozzászólás Aktív témák