ZADANIE 25: 1. Napíšte program, v ktorom sa kružnica bude posúvať po obrazovke vodorovne zľava doprava.
1. Napíšte program, v ktorom sa kružnica bude posúvať po obrazovke vodorovne zľava doprava. Program pohyb; uses grafika; var x: integer; const biela=15; cierna=0; begin for x:=100 to 150 do beginsetcolor(biela); circle(x,100,20);delay(100);setcolor(cierna); circle(x,100,20); end;end.