ELEMENTE DE MODELARE elemente de modelare | Page 5

5

Abstractizînd problema, obţinem următoarea formulare: un punct se mişcă pe o traiectorie dată de ecuaţia x = 1/2..

Al doilea punct se mişcă pe o traiectorie dată de ecuaţia  x2 + y2 = 1. Se cere să se găsească soluţiile sistemului de ecuaţii:

Grafic problema este reprezentată de schema alăturată.

Problemele se pot rezolva prin programul ;program cn01;

vart, x0,k,m,x: real;

begin

readln(x0,k,m,t);

x:=x0*cos(sqrt(k/m*t));

writeln(’x=’, x:0:6);

end.