Переписать с паскаля на питон

@Laky2223 · Регистрация: 05.12.2019

Студворк — интернет-сервис помощи студентам

Здравствуйте! Помогите переписать код с паскаля на питон с использованием библиотеки Pillow. Должна получится снежинка

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses GraphABC;
var  k: integer := 7; { глубина рекурсии}
     n: integer;
     ku: real := 2.7; {коэф.ум.днины лучей}
     dl: integer := 200; {нач.длина луча}
procedure sneg(n,x,y,dl,k: integer);
var i : integer; x1,y1 : integer;
begin
   if k <> 0 then
   for i := 1 to n do begin
      x1 := round( x + dl*sin(i*360/n *pi/180) );
      y1 := round( y + dl*cos(i*360/n *pi/180) );
      
      pen.Color := rgb(k*30,256- k*30,0);
      line(x,y, x1,y1);
      sneg(n,x1,y1, round(dl/ku), k-1);
   end;
end;
begin
    Window.Maximize;
    readln(n);
    Coordinate.SetMathematic;
    coordinate.OriginX := WindowWidth div 2;
    Coordinate.originY := WindowHeight div 2;
  {  FloodFill(0,0,clblue);}
   
    sneg(n,0,0,dl,k);
end.

Рыжий Лис · 21.06.2021, 15:30

А можно matplotlib?

@MSP_cyber · 21.06.2021, 21:29

Рыжий Лис,
Я ещё только учусь, и очень бы хотел увидеть, как это делается на matplotlib...
Если нетрудно... был бы рад увидеть код.

@Berbentsev · 21.06.2021, 23:05

Сейчас немного доработаю код, но уже выводит следующее.

@Berbentsev · 21.06.2021, 23:10

Python
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
from PIL import Image, ImageDraw
import math
 
 
def snow(n, x, y, dl, k, ku) -> None:
    """
    Рисуем снежинку.
    :param n: Количество лучей.
    :param x: Начальная координата луча
    :param y: Начальная координата луча
    :param dl: длинна луча
    :param k: глубина рекурсии
    :param ku: коэффициент уменьшения длины лучей
    :return: None
    """
    if k != 0:
        for i in range(n):
            x1 = x + dl * math.sin(i * 360 / n * math.pi / 180)
            y1 = y + dl * math.cos(i * 360 / n * math.pi / 180)
            idraw.line((x, y, x1, y1), fill='white', width=2)
            snow(n, x1, y1, dl / ku, k - 1, ku)
    else:
        return
 
 
img = Image.new('RGBA', (1000, 1000), 'blue')
idraw = ImageDraw.Draw(img)
snow(7, 500, 500, 250, 7, 2.7)
img.save('snow.png')

Не лучшее исполнение, но код почти дословно с паскаля.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

Рыжий Лис Просто Лис 5973 / 3735 / 1099 Регистрация: 17.05.2012 Сообщений: 10,791 Записей в блоге: 9
	21.06.2021, 15:30
	А можно matplotlib? 0

@MSP_cyber 18 / 16 / 4 Регистрация: 29.03.2015 Сообщений: 100
	21.06.2021, 21:29
	Рыжий Лис, Я ещё только учусь, и очень бы хотел увидеть, как это делается на matplotlib... Если нетрудно... был бы рад увидеть код. 0

@Berbentsev 290 / 170 / 92 Регистрация: 21.03.2016 Сообщений: 400
	21.06.2021, 23:05
	Сейчас немного доработаю код, но уже выводит следующее. Миниатюры 3