Програмування Pascal, Детальна інформація

bar (sx,230,sx+len,235);

angle:=45;

speed:=50;

setcolor (white);

st:= 'Сила кидка: ';

outtextxy (15,20,st);

st:= 'Кут кидка: ';

outtextxy (15,30,st);

str (speed,st);

outtextxy (120,20,st);

str (angle,st);

outtextxy (120,30,st);

setcolor (yellow);

line (20,230,27,215);

line (27,215,34,230);

line (27,215,27,197);



-

,

.

0

@

B

R

T

¤



¤

\x0A01\x6C03\x6100\x03F6\x0E10\x0100