Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
матрица из шариков
uses GraphABC; var x, y, i : integer; begin x := 50; y := 50; for i := 0 to 49 do begin if i mod 10 <> 0 then begin circle (x, y, 5); x := x + 50; end else begin x := 50; y := y + 50; circle (x, y, 5); x := x + 50; end; end; end.
run
|
edit
|
history
|
help
0
Huong11a2@
practica 5 ejercicio 8
Подсчёт количества целочисленных точек внутри круга радиуса r
test07
suduko solver
practica 11 ejercicio 3
AreaTriangulo.pas
SmallQuest
test12
Llena un arreglo (con while)