polkovniki daviT maRlakeliZe erekle meoris samxedro xelovneba ...
polkovniki daviT maRlakeliZe erekle meoris samxedro xelovneba ...
polkovniki daviT maRlakeliZe erekle meoris samxedro xelovneba ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
danarTi #2<br />
Yyirbulaxis brZolis raodenobrivi analizi.<br />
CLS<br />
x0 = 2500<br />
y0 = 2500<br />
x = x0<br />
y = y0<br />
x1 = 500<br />
x2 = 500<br />
x3 = 500<br />
x4 = 500<br />
xt = 500<br />
y1 = 2600<br />
a0 = .005<br />
k = 3.5<br />
LPRINT "pirveli brdzola"<br />
10 x2m = x2 - y1 * a0<br />
y1m = y1 - x2 * k * a0<br />
x2 = x2m<br />
y1 = y1m<br />
IF x2 > 500 * .75 THEN GOTO 10<br />
LPRINT "pirveli setakebisas danakargebi chveni", 500 - x2, "mtris"; 2600 - y1<br />
LPRINT "alkidan gamosvla"<br />
v = (16500 - (2600 - y1)) / 8<br />
u = x1 + x4<br />
v0 = v<br />
u0 = u<br />
20 um = u - a0 * v<br />
vm = v - a0 * 4.5 * u<br />
u = um<br />
v = vm<br />
164
Change language