Полезные коды

Решето Аткина

 
Использование:
  1. Atkin a = new Atkin(2000000);
  2.  
  3. int i = 1000000
  4. while (i < 2000000)
  5. {
  6.     if (a.IsPrimes[i]) Console.WriteLine(i);
  7. }
Выведет все простые числа в диапазоне от 1 000 000 до 20 000 000.[/i]

Решето Аткина

 
Пример использования:
  1. a = AtkinSieve(2000000)
  2.  
  3. for i in range(0, len(a)):
  4.     if (a[i] > 1000000) and (a[i] < 2000000):
  5.         print a[i]
Выводит все простые числа в диапазоне от 1 000 000 до 2 000 000.[/i]

Рисуем правильный многоугольник (PascalABC.NET)

 
corners — количество углов;
radius — радиус описанной окружности;
x, y — координаты центра фигуры;
difangle — угол отклонения

Пример использования:
  1. uses GraphABC;
  2.  
  3. Pen.Color := Color.Red;
  4. GraphABC.Polygon(getPolygon(6, 100, Window.Width div 2, Window.Height

Рисуем правильный многоугольник

corners — количество углов;
radius — радиус описанной окружности;
x, y — координаты центра фигуры.

Пример использования:
  1. Canvas canvas;
  2. int width, height;// размеры экрана
  3. ...
  4. Paint paint = new Paint();
  5. paint.setColor(Color.YELLOW);
  6. canvas.drawPath(getPolygon(6,

Импорт картинки по ссылке

По просьбе одного товарища
примеры
  1. copy_image_from_url('http://koenig.h2m.ru/test/downloads/index.php?f=54');
  2. copy_image_from_url('http://annimon.com/theme/webdefault/images/logo_new.png');
  3. copy_image_from_url('http://koenig.h2m.ru/test/img/sm/zvezdy.gif');
  4. copy_image_from_url('http://seclub.org/img/touch-logo.png');
  5. copy_image_from_url('http://johncms.com/theme/varg/images/logo.gif');
Всего: 541
<< 1 ... 66 67 68 69 70 ... 109 >>

Реклама

Мы в соцсетях

tw tg yt gt