hi czy jest ktoś mądry i może wie jak napisac program w pascalu który przemieszcza okrąg od lewej do prawej, sztafete z tym okregiem , od dolengo rogu do przeciwnego oraz po sinusoidzie szczerze to ja nie mam pojęcia ale jak byście mieli infę z ogórem życze powodzenia :-D
0
0
Takie zlecenia to do działu Praca. Albo napisz, CZEGO NIE UMIESZ zrobić, ewentualnie pokaż, co już zrobiłeś.
0
wiem jak zrobić grafikę tylko chodzi mi o animację jak zrobić żeby to kolko sie ruszało?
0
jmasz dwa integery pozycja x i y tam wstawiasz wartosci
np. x := x -1;
i powinno w lewo leciec
kąt :single;
po sinusoidzie Sin(kąt * (3.140/ 180.0) );
r:integer;
for r:=0 to 359 do begin
x = rSin(kąt * (3.140/ 180.0) );
y = rSin(kąt * (3.140/ 180.0) );
end;
moze byc problem z zamiana float na int
0
Dajesz pętlę Repeat o warunku Until ReadKey a w niej po każdym wyliczeniu nowej wartości dajesz Delay(x).
0
thx a jak zrobić sztafetę (2 kółka 1 przybija to drugieodbija i na zmianę)?
0
z tym sinusem cos nie tak;)